home *** CD-ROM | disk | FTP | other *** search
/ Acorn Risc Technologies StrongARM CD-ROM / Acorn Risc Technologies StrongARM CD-ROM.iso / software / amusing / wimpdd / !WimpDDLI_!RunImage < prev    next >
Unknown  |  1994-08-18  |  21.5 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0e f4 20 57 69 | 6d 70 44 44 4c 49 0d 00 |..... Wi|mpDDLI..|
|00000010| 14 1f f4 20 76 65 72 73 | 69 6f 6e 20 33 2e 34 31 |... vers|ion 3.41|
|00000020| 2c 20 41 75 67 75 73 74 | 20 31 39 39 34 0d 00 1e |, August| 1994...|
|00000030| 11 f4 20 a9 20 54 69 6d | 20 42 69 72 6b 73 0d 00 |.. . Tim| Birks..|
|00000040| 28 1a f4 20 44 44 4c 49 | 20 a9 20 46 65 72 67 75 |(.. DDLI| . Fergu|
|00000050| 73 20 44 75 6e 69 68 6f | 0d 00 32 0e ee 85 f2 65 |s Duniho|..2....e|
|00000060| 72 72 6f 72 3a e0 0d 00 | 3c 09 f2 69 6e 69 74 0d |rror:...|<..init.|
|00000070| 00 46 0c ee 85 f2 65 72 | 72 6f 72 0d 00 50 05 f5 |.F....er|ror..P..|
|00000080| 0d 00 5a 26 20 c8 99 22 | 57 69 6d 70 5f 50 6f 6c |..Z& .."|Wimp_Pol|
|00000090| 6c 22 2c 26 31 2c 62 6c | 6f 63 6b 25 20 b8 20 72 |l",&1,bl|ock% . r|
|000000a0| 65 61 73 6f 6e 25 0d 00 | 64 11 20 c8 8e 20 72 65 |eason%..|d. .. re|
|000000b0| 61 73 6f 6e 25 20 ca 0d | 00 6e 14 20 c9 31 3a f2 |ason% ..|.n. .1:.|
|000000c0| 70 6f 6c 6c 5f 72 65 64 | 72 61 77 0d 00 78 12 20 |poll_red|raw..x. |
|000000d0| c9 32 3a f2 70 6f 6c 6c | 5f 6f 70 65 6e 0d 00 82 |.2:.poll|_open...|
|000000e0| 13 20 c9 33 3a f2 70 6f | 6c 6c 5f 63 6c 6f 73 65 |. .3:.po|ll_close|
|000000f0| 0d 00 8c 13 20 c9 36 3a | f2 70 6f 6c 6c 5f 6d 6f |.... .6:|.poll_mo|
|00000100| 75 73 65 0d 00 96 12 20 | c9 37 3a f2 70 6f 6c 6c |use.... |.7:.poll|
|00000110| 5f 64 72 61 67 0d 00 a0 | 12 20 c9 39 3a f2 70 6f |_drag...|. .9:.po|
|00000120| 6c 6c 5f 6d 65 6e 75 0d | 00 aa 19 20 c9 31 37 2c |ll_menu.|... .17,|
|00000130| 31 38 3a f2 70 6f 6c 6c | 5f 6d 65 73 73 61 67 65 |18:.poll|_message|
|00000140| 0d 00 b4 06 20 cb 0d 00 | be 0a fd 71 75 69 74 25 |.... ...|...quit%|
|00000150| 0d 00 c8 0e e7 63 68 25 | 20 d9 23 63 68 25 0d 00 |.....ch%| .#ch%..|
|00000160| d2 10 e7 76 63 68 25 20 | d9 23 76 63 68 25 0d 00 |...vch% |.#vch%..|
|00000170| dc 16 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |...."Wim|p_CloseD|
|00000180| 6f 77 6e 22 0d 00 e6 05 | e0 0d 00 f0 04 0d 00 fa |own"....|........|
|00000190| 11 dd f2 70 6f 6c 6c 5f | 72 65 64 72 61 77 0d 01 |...poll_|redraw..|
|000001a0| 04 0a ea 66 6c 61 67 25 | 0d 01 0e 29 c8 99 22 57 |...flag%|...).."W|
|000001b0| 69 6d 70 5f 52 65 64 72 | 61 77 57 69 6e 64 6f 77 |imp_Redr|awWindow|
|000001c0| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 66 6c 61 67 |",,block|% . flag|
|000001d0| 25 0d 01 18 0c c8 95 20 | 66 6c 61 67 25 0d 01 22 |%...... |flag%.."|
|000001e0| 0b f2 72 65 64 72 61 77 | 0d 01 2c 29 c8 99 22 57 |..redraw|..,).."W|
|000001f0| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|00000200| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 66 6c 61 67 |",,block|% . flag|
|00000210| 25 0d 01 36 05 ce 0d 01 | 40 05 e1 0d 01 4a 04 0d |%..6....|@....J..|
|00000220| 01 54 0f dd f2 70 6f 6c | 6c 5f 6f 70 65 6e 0d 01 |.T...pol|l_open..|
|00000230| 5e 35 e7 21 62 6c 6f 63 | 6b 25 3d 76 69 65 77 68 |^5.!bloc|k%=viewh|
|00000240| 61 6e 64 6c 65 25 20 62 | 6c 6f 63 6b 25 21 32 34 |andle% b|lock%!24|
|00000250| 3d 33 32 2a 28 62 6c 6f | 63 6b 25 21 32 34 20 81 |=32*(blo|ck%!24 .|
|00000260| 33 32 29 0d 01 68 1f c8 | 99 22 57 69 6d 70 5f 4f |32)..h..|."Wimp_O|
|00000270| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00000280| 6b 25 0d 01 72 05 e1 0d | 01 7c 04 0d 01 86 10 dd |k%..r...|.|......|
|00000290| f2 70 6f 6c 6c 5f 63 6c | 6f 73 65 0d 01 90 17 e7 |.poll_cl|ose.....|
|000002a0| 76 63 68 25 20 d9 23 76 | 63 68 25 3a 76 63 68 25 |vch% .#v|ch%:vch%|
|000002b0| 3d 30 0d 01 9a 20 c8 99 | 22 57 69 6d 70 5f 43 6c |=0... ..|"Wimp_Cl|
|000002c0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|000002d0| 6b 25 0d 01 a4 05 e1 0d | 01 ae 04 0d 01 b8 10 dd |k%......|........|
|000002e0| f2 70 6f 6c 6c 5f 6d 6f | 75 73 65 0d 01 c2 20 ea |.poll_mo|use... .|
|000002f0| 78 25 2c 79 25 2c 62 75 | 74 74 6f 6e 25 2c 77 69 |x%,y%,bu|tton%,wi|
|00000300| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 0d 01 cc 4d 78 |ndow%,ic|on%...Mx|
|00000310| 25 3d 21 62 6c 6f 63 6b | 25 3a 79 25 3d 62 6c 6f |%=!block|%:y%=blo|
|00000320| 63 6b 25 21 34 3a 62 75 | 74 74 6f 6e 25 3d 62 6c |ck%!4:bu|tton%=bl|
|00000330| 6f 63 6b 25 21 38 3a 77 | 69 6e 64 6f 77 25 3d 62 |ock%!8:w|indow%=b|
|00000340| 6c 6f 63 6b 25 21 31 32 | 3a 69 63 6f 6e 25 3d 62 |lock%!12|:icon%=b|
|00000350| 6c 6f 63 6b 25 21 31 36 | 0d 01 d6 10 c8 8e 20 62 |lock%!16|...... b|
|00000360| 75 74 74 6f 6e 25 20 ca | 0d 01 e0 15 c9 32 3a f4 |utton% .|.....2:.|
|00000370| 20 6d 65 6e 75 20 63 6c | 69 63 6b 65 64 0d 01 ea | menu cl|icked...|
|00000380| 11 20 c8 8e 20 77 69 6e | 64 6f 77 25 20 ca 0d 01 |. .. win|dow% ...|
|00000390| f4 18 20 c9 2d 32 3a f4 | 20 69 63 6f 6e 20 62 61 |.. .-2:.| icon ba|
|000003a0| 72 20 69 63 6f 6e 0d 01 | fe 15 20 20 6d 65 6e 75 |r icon..|.. menu|
|000003b0| 24 3d 22 69 63 6f 6e 62 | 61 72 22 0d 02 08 35 20 |$="iconb|ar"...5 |
|000003c0| 20 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d | .."Wimp|_CreateM|
|000003d0| 65 6e 75 22 2c 2c 69 63 | 6f 6e 62 61 72 6d 65 6e |enu",,ic|onbarmen|
|000003e0| 75 25 2c 78 25 2d 36 34 | 2c 39 36 2b 33 2a 34 34 |u%,x%-64|,96+3*44|
|000003f0| 0d 02 12 17 20 c9 20 71 | 75 65 73 74 69 6f 6e 68 |.... . q|uestionh|
|00000400| 61 6e 64 6c 65 25 3a 0d | 02 1c 16 20 20 6d 65 6e |andle%:.|... men|
|00000410| 75 24 3d 22 71 75 65 73 | 74 69 6f 6e 22 0d 02 26 |u$="ques|tion"..&|
|00000420| 31 20 20 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |1 .."Wi|mp_Creat|
|00000430| 65 4d 65 6e 75 22 2c 2c | 71 75 65 73 74 69 6f 6e |eMenu",,|question|
|00000440| 6d 65 6e 75 25 2c 78 25 | 2d 36 34 2c 79 25 0d 02 |menu%,x%|-64,y%..|
|00000450| 30 14 20 c9 20 72 65 73 | 75 6c 74 68 61 6e 64 6c |0. . res|ulthandl|
|00000460| 65 25 0d 02 3a 14 20 20 | 6d 65 6e 75 24 3d 22 72 |e%..:. |menu$="r|
|00000470| 65 73 75 6c 74 22 0d 02 | 44 2f 20 20 c8 99 22 57 |esult"..|D/ .."W|
|00000480| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00000490| 2c 72 65 73 75 6c 74 6d | 65 6e 75 25 2c 78 25 2d |,resultm|enu%,x%-|
|000004a0| 36 34 2c 79 25 0d 02 4e | 12 20 c9 20 76 69 65 77 |64,y%..N|. . view|
|000004b0| 68 61 6e 64 6c 65 25 0d | 02 58 19 20 20 e7 71 75 |handle%.|.X. .qu|
|000004c0| 65 73 74 69 6f 6e 25 3e | 6e 68 65 72 65 25 20 8c |estion%>|nhere% .|
|000004d0| 0d 02 62 15 20 20 20 6d | 65 6e 75 24 3d 22 72 65 |..b. m|enu$="re|
|000004e0| 73 75 6c 74 22 0d 02 6c | 30 20 20 20 c8 99 22 57 |sult"..l|0 .."W|
|000004f0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00000500| 2c 72 65 73 75 6c 74 6d | 65 6e 75 25 2c 78 25 2d |,resultm|enu%,x%-|
|00000510| 36 34 2c 79 25 0d 02 76 | 07 20 20 cc 0d 02 80 17 |64,y%..v|. .....|
|00000520| 20 20 20 6d 65 6e 75 24 | 3d 22 71 75 65 73 74 69 | menu$|="questi|
|00000530| 6f 6e 22 0d 02 8a 32 20 | 20 20 c8 99 22 57 69 6d |on"...2 | .."Wim|
|00000540| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 71 |p_Create|Menu",,q|
|00000550| 75 65 73 74 69 6f 6e 6d | 65 6e 75 25 2c 78 25 2d |uestionm|enu%,x%-|
|00000560| 36 34 2c 79 25 0d 02 94 | 07 20 20 cd 0d 02 9e 06 |64,y%...|. .....|
|00000570| 20 cb 0d 02 a8 21 c9 31 | 2c 34 3a f4 20 61 64 6a | ....!.1|,4:. adj|
|00000580| 75 73 74 2c 20 73 65 6c | 65 63 74 20 63 6c 69 63 |ust, sel|ect clic|
|00000590| 6b 65 64 0d 02 b2 11 20 | c8 8e 20 77 69 6e 64 6f |ked.... |.. windo|
|000005a0| 77 25 20 ca 0d 02 bc 18 | 20 c9 2d 32 3a f4 20 69 |w% .....| .-2:. i|
|000005b0| 63 6f 6e 20 62 61 72 20 | 69 63 6f 6e 0d 02 c6 14 |con bar |icon....|
|000005c0| 20 20 c8 8e 20 71 75 65 | 73 74 69 6f 6e 25 20 ca | .. que|stion% .|
|000005d0| 0d 02 d0 1c 20 20 c9 30 | 3a f4 20 69 6e 74 72 6f |.... .0|:. intro|
|000005e0| 20 77 69 6e 64 6f 77 20 | 6f 70 65 6e 0d 02 da 11 | window |open....|
|000005f0| 20 20 20 f2 6f 70 65 6e | 69 6e 74 72 6f 0d 02 e4 | .open|intro...|
|00000600| 10 20 20 c9 6e 68 65 72 | 65 25 2b 31 3a 0d 02 ee |. .nher|e%+1:...|
|00000610| 12 20 20 20 f2 6f 70 65 | 6e 72 65 73 75 6c 74 0d |. .ope|nresult.|
|00000620| 02 f8 08 20 20 7f 3a 0d | 03 02 10 20 20 20 f2 71 |... .:.|... .q|
|00000630| 75 65 73 74 69 6f 6e 0d | 03 0c 07 20 20 cb 0d 03 |uestion.|... ...|
|00000640| 16 21 20 c9 69 6e 74 72 | 6f 68 61 6e 64 6c 65 25 |.! .intr|ohandle%|
|00000650| 3a f4 20 69 6e 74 72 6f | 20 77 69 6e 64 6f 77 0d |:. intro| window.|
|00000660| 03 20 10 20 20 e7 69 63 | 6f 6e 25 3d 30 20 8c 0d |. . .ic|on%=0 ..|
|00000670| 03 2a 26 20 20 20 6f 6c | 64 74 79 70 65 24 3d a4 |.*& ol|dtype$=.|
|00000680| 64 75 66 66 74 79 70 65 | 28 24 69 6e 74 72 6f 69 |dufftype|($introi|
|00000690| 63 6f 6e 25 29 0d 03 34 | 23 20 20 20 c8 99 22 57 |con%)..4|# .."W|
|000006a0| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|000006b0| 74 69 6f 6e 22 2c 2d 31 | 0d 03 3e 1b 20 20 20 21 |tion",-1|..>. !|
|000006c0| 62 6c 6f 63 6b 25 3d 69 | 6e 74 72 6f 68 61 6e 64 |block%=i|ntrohand|
|000006d0| 6c 65 25 0d 03 48 23 20 | 20 20 c8 99 22 57 69 6d |le%..H# | .."Wim|
|000006e0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|000006f0| 62 6c 6f 63 6b 25 0d 03 | 52 13 20 20 20 f2 73 74 |block%..|R. .st|
|00000700| 61 72 74 61 73 6b 69 6e | 67 0d 03 5c 07 20 20 cd |artaskin|g..\. .|
|00000710| 0d 03 66 28 20 c9 71 75 | 65 73 74 69 6f 6e 68 61 |..f( .qu|estionha|
|00000720| 6e 64 6c 65 25 3a f4 20 | 71 75 65 73 74 69 6f 6e |ndle%:. |question|
|00000730| 73 20 77 69 6e 64 6f 77 | 0d 03 70 10 20 20 c8 8e |s window|..p. ..|
|00000740| 20 69 63 6f 6e 25 20 ca | 0d 03 7a 48 20 20 c9 38 | icon% .|..zH .8|
|00000750| 2c 39 2c 31 30 2c 31 31 | 2c 31 32 2c 31 33 2c 31 |,9,10,11|,12,13,1|
|00000760| 34 2c 31 35 2c 31 36 2c | 31 37 2c 31 38 2c 31 39 |4,15,16,|17,18,19|
|00000770| 2c 32 30 2c 32 31 2c 32 | 32 3a f4 20 63 6c 69 63 |,20,21,2|2:. clic|
|00000780| 6b 65 64 20 6f 6e 20 61 | 6e 20 61 6e 73 77 65 72 |ked on a|n answer|
|00000790| 0d 03 84 35 20 20 20 61 | 6e 73 77 65 72 25 28 71 |...5 a|nswer%(q|
|000007a0| 75 65 73 74 69 6f 6e 25 | 29 3d 69 63 6f 6e 25 2d |uestion%|)=icon%-|
|000007b0| 31 35 3a 64 6f 6e 65 25 | 28 71 75 65 73 74 69 6f |15:done%|(questio|
|000007c0| 6e 25 29 3d b9 0d 03 8e | 2d 20 20 20 f2 73 65 74 |n%)=....|- .set|
|000007d0| 71 75 65 73 74 69 6f 6e | 69 63 6f 6e 28 61 6e 73 |question|icon(ans|
|000007e0| 77 65 72 25 28 71 75 65 | 73 74 69 6f 6e 25 29 2c |wer%(que|stion%),|
|000007f0| b9 29 0d 03 98 3f 20 20 | 20 e7 71 75 65 73 74 69 |.)...? | .questi|
|00000800| 6f 6e 25 3d 6e 68 65 72 | 65 25 20 f2 6e 65 78 74 |on%=nher|e% .next|
|00000810| 71 75 65 73 74 69 6f 6e | 28 31 2c b9 29 20 8b f2 |question|(1,.) ..|
|00000820| 6e 65 78 74 71 75 65 73 | 74 69 6f 6e 28 31 2c a3 |nextques|tion(1,.|
|00000830| 29 0d 03 a2 14 20 20 c9 | 32 35 3a f4 20 62 61 63 |).... .|25:. bac|
|00000840| 6b 77 61 72 64 0d 03 ac | 1a 20 20 20 f2 6e 65 78 |kward...|. .nex|
|00000850| 74 71 75 65 73 74 69 6f | 6e 28 2d 31 2c a3 29 0d |tquestio|n(-1,.).|
|00000860| 03 b6 13 20 20 c9 32 36 | 3a f4 20 66 6f 72 77 61 |... .26|:. forwa|
|00000870| 72 64 0d 03 c0 19 20 20 | 20 f2 6e 65 78 74 71 75 |rd.... | .nextqu|
|00000880| 65 73 74 69 6f 6e 28 31 | 2c a3 29 0d 03 ca 24 20 |estion(1|,.)...$ |
|00000890| 20 c9 32 37 3a f4 20 6e | 65 78 74 20 75 6e 61 6e | .27:. n|ext unan|
|000008a0| 73 77 65 72 65 64 20 71 | 75 65 73 74 69 6f 6e 0d |swered q|uestion.|
|000008b0| 03 d4 19 20 20 20 f2 6e | 65 78 74 71 75 65 73 74 |... .n|extquest|
|000008c0| 69 6f 6e 28 31 2c b9 29 | 0d 03 de 07 20 20 cb 0d |ion(1,.)|.... ..|
|000008d0| 03 e8 41 20 20 e7 71 75 | 65 73 74 69 6f 6e 25 3c |..A .qu|estion%<|
|000008e0| 3e 6e 68 65 72 65 25 2b | 31 20 f2 71 75 65 73 74 |>nhere%+|1 .quest|
|000008f0| 69 6f 6e 20 8b f2 63 6c | 6f 73 65 71 75 65 73 74 |ion ..cl|osequest|
|00000900| 69 6f 6e 73 3a f2 6f 70 | 65 6e 72 65 73 75 6c 74 |ions:.op|enresult|
|00000910| 0d 03 f2 1f 20 c9 73 61 | 76 65 68 61 6e 64 6c 65 |.... .sa|vehandle|
|00000920| 25 3a f4 20 73 61 76 65 | 20 77 69 6e 64 6f 77 0d |%:. save| window.|
|00000930| 03 fc 10 20 20 e7 69 63 | 6f 6e 25 3d 32 20 8c 0d |... .ic|on%=2 ..|
|00000940| 04 06 1f 20 20 20 73 61 | 76 65 6e 61 6d 65 24 3d |... sa|vename$=|
|00000950| 24 73 61 76 65 6e 61 6d | 65 69 63 6f 6e 25 0d 04 |$savenam|eicon%..|
|00000960| 10 4d 20 20 20 e7 a7 73 | 61 76 65 6e 61 6d 65 24 |.M ..s|avename$|
|00000970| 2c 22 2e 22 29 3d 30 20 | 85 32 35 35 2c 22 54 6f |,".")=0 |.255,"To|
|00000980| 20 73 61 76 65 2c 20 64 | 72 61 67 20 74 68 65 20 | save, d|rag the |
|00000990| 69 63 6f 6e 20 74 6f 20 | 61 20 64 69 72 65 63 74 |icon to |a direct|
|000009a0| 6f 72 79 20 76 69 65 77 | 65 72 22 0d 04 1a 1b 20 |ory view|er".... |
|000009b0| 20 20 f2 73 61 76 65 66 | 69 6c 65 28 73 61 76 65 | .savef|ile(save|
|000009c0| 6e 61 6d 65 24 29 0d 04 | 24 1e 20 20 20 c8 99 22 |name$)..|$. .."|
|000009d0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|000009e0| 2c 2c 2d 31 0d 04 2e 07 | 20 20 cd 0d 04 38 06 20 |,,-1....| ...8. |
|000009f0| cb 0d 04 42 11 c9 31 36 | 2c 36 34 3a f4 20 64 72 |...B..16|,64:. dr|
|00000a00| 61 67 0d 04 4c 24 20 e7 | 77 69 6e 64 6f 77 25 3d |ag..L$ .|window%=|
|00000a10| 73 61 76 65 68 61 6e 64 | 6c 65 25 20 80 69 63 6f |savehand|le% .ico|
|00000a20| 6e 25 3d 30 20 8c 0d 04 | 56 39 20 20 21 62 6c 6f |n%=0 ...|V9 !blo|
|00000a30| 63 6b 25 3d 73 61 76 65 | 68 61 6e 64 6c 65 25 3a |ck%=save|handle%:|
|00000a40| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00000a50| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |wState",|,block%.|
|00000a60| 04 60 32 20 20 78 25 3d | 62 6c 6f 63 6b 25 21 34 |.`2 x%=|block%!4|
|00000a70| 2d 62 6c 6f 63 6b 25 21 | 32 30 3a 79 25 3d 62 6c |-block%!|20:y%=bl|
|00000a80| 6f 63 6b 25 21 31 36 2d | 62 6c 6f 63 6b 25 21 32 |ock%!16-|block%!2|
|00000a90| 34 0d 04 6a 32 20 20 62 | 6c 6f 63 6b 25 21 34 3d |4..j2 b|lock%!4=|
|00000aa0| 69 63 6f 6e 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |icon%:..|"Wimp_Ge|
|00000ab0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00000ac0| 63 6b 25 0d 04 74 50 20 | 20 78 6d 69 6e 25 3d 78 |ck%..tP | xmin%=x|
|00000ad0| 25 2b 62 6c 6f 63 6b 25 | 21 38 3a 79 6d 69 6e 25 |%+block%|!8:ymin%|
|00000ae0| 3d 79 25 2b 62 6c 6f 63 | 6b 25 21 31 32 3a 78 6d |=y%+bloc|k%!12:xm|
|00000af0| 61 78 25 3d 78 25 2b 62 | 6c 6f 63 6b 25 21 31 36 |ax%=x%+b|lock%!16|
|00000b00| 3a 79 6d 61 78 25 3d 79 | 25 2b 62 6c 6f 63 6b 25 |:ymax%=y|%+block%|
|00000b10| 21 32 30 0d 04 7e 4f 20 | 20 62 6c 6f 63 6b 25 21 |!20..~O | block%!|
|00000b20| 34 3d 35 3a 62 6c 6f 63 | 6b 25 21 38 3d 78 6d 69 |4=5:bloc|k%!8=xmi|
|00000b30| 6e 25 3a 62 6c 6f 63 6b | 25 21 31 32 3d 79 6d 69 |n%:block|%!12=ymi|
|00000b40| 6e 25 3a 62 6c 6f 63 6b | 25 21 31 36 3d 78 6d 61 |n%:block|%!16=xma|
|00000b50| 78 25 3a 62 6c 6f 63 6b | 25 21 32 30 3d 79 6d 61 |x%:block|%!20=yma|
|00000b60| 78 25 0d 04 88 45 20 20 | 62 6c 6f 63 6b 25 21 32 |x%...E |block%!2|
|00000b70| 34 3d 30 3a 62 6c 6f 63 | 6b 25 21 32 38 3d 30 3a |4=0:bloc|k%!28=0:|
|00000b80| 62 6c 6f 63 6b 25 21 33 | 32 3d 26 37 46 46 46 46 |block%!3|2=&7FFFF|
|00000b90| 46 46 46 3a 62 6c 6f 63 | 6b 25 21 33 36 3d 26 37 |FFF:bloc|k%!36=&7|
|00000ba0| 46 46 46 46 46 46 46 0d | 04 92 1e 20 20 c8 99 22 |FFFFFFF.|... .."|
|00000bb0| 57 69 6d 70 5f 44 72 61 | 67 42 6f 78 22 2c 2c 62 |Wimp_Dra|gBox",,b|
|00000bc0| 6c 6f 63 6b 25 0d 04 9c | 06 20 cd 0d 04 a6 05 cb |lock%...|. ......|
|00000bd0| 0d 04 b0 05 e1 0d 04 ba | 04 0d 04 c4 0f dd f2 70 |........|.......p|
|00000be0| 6f 6c 6c 5f 64 72 61 67 | 0d 04 ce 2b ea 69 25 2c |oll_drag|...+.i%,|
|00000bf0| 64 65 73 74 78 25 2c 64 | 65 73 74 79 25 2c 64 65 |destx%,d|esty%,de|
|00000c00| 73 74 68 61 6e 64 6c 65 | 25 2c 64 65 73 74 69 63 |sthandle|%,destic|
|00000c10| 6f 6e 25 0d 04 d8 1c 73 | 61 76 65 6e 61 6d 65 24 |on%....s|avename$|
|00000c20| 3d 24 73 61 76 65 6e 61 | 6d 65 69 63 6f 6e 25 0d |=$savena|meicon%.|
|00000c30| 04 e2 16 69 25 3d a7 73 | 61 76 65 6e 61 6d 65 24 |...i%=.s|avename$|
|00000c40| 2c 22 2e 22 29 0d 04 ec | 0a c8 95 69 25 3e 30 0d |,".")...|...i%>0.|
|00000c50| 04 f6 1f 20 73 61 76 65 | 6e 61 6d 65 24 3d c1 73 |... save|name$=.s|
|00000c60| 61 76 65 6e 61 6d 65 24 | 2c 69 25 2b 31 29 0d 05 |avename$|,i%+1)..|
|00000c70| 00 17 20 69 25 3d a7 73 | 61 76 65 6e 61 6d 65 24 |.. i%=.s|avename$|
|00000c80| 2c 22 2e 22 29 0d 05 0a | 05 ce 0d 05 14 23 c8 99 |,".")...|.....#..|
|00000c90| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00000ca0| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 25 0d 05 1e |Info",,b|lock%...|
|00000cb0| 4c 64 65 73 74 78 25 3d | 21 62 6c 6f 63 6b 25 3a |Ldestx%=|!block%:|
|00000cc0| 64 65 73 74 79 25 3d 62 | 6c 6f 63 6b 25 21 34 3a |desty%=b|lock%!4:|
|00000cd0| 64 65 73 74 68 61 6e 64 | 6c 65 25 3d 62 6c 6f 63 |desthand|le%=bloc|
|00000ce0| 6b 25 21 31 32 3a 64 65 | 73 74 69 63 6f 6e 25 3d |k%!12:de|sticon%=|
|00000cf0| 62 6c 6f 63 6b 25 21 31 | 36 0d 05 28 22 21 62 6c |block%!1|6..("!bl|
|00000d00| 6f 63 6b 25 3d 34 2a 28 | 28 34 39 2b a9 73 61 76 |ock%=4*(|(49+.sav|
|00000d10| 65 6e 61 6d 65 24 29 20 | 81 34 29 0d 05 32 45 62 |ename$) |.4)..2Eb|
|00000d20| 6c 6f 63 6b 25 21 31 32 | 3d 30 3a 62 6c 6f 63 6b |lock%!12|=0:block|
|00000d30| 25 21 31 36 3d 31 3a 62 | 6c 6f 63 6b 25 21 32 30 |%!16=1:b|lock%!20|
|00000d40| 3d 64 65 73 74 68 61 6e | 64 6c 65 25 3a 62 6c 6f |=desthan|dle%:blo|
|00000d50| 63 6b 25 21 32 34 3d 64 | 65 73 74 69 63 6f 6e 25 |ck%!24=d|esticon%|
|00000d60| 0d 05 3c 36 62 6c 6f 63 | 6b 25 21 32 38 3d 64 65 |..<6bloc|k%!28=de|
|00000d70| 73 74 78 25 3a 62 6c 6f | 63 6b 25 21 33 32 3d 64 |stx%:blo|ck%!32=d|
|00000d80| 65 73 74 79 25 3a 62 6c | 6f 63 6b 25 21 33 36 3d |esty%:bl|ock%!36=|
|00000d90| 26 31 30 30 30 30 0d 05 | 46 22 62 6c 6f 63 6b 25 |&10000..|F"block%|
|00000da0| 21 34 30 3d a0 28 22 26 | 22 2b c2 73 61 76 65 69 |!40=.("&|"+.savei|
|00000db0| 63 6f 6e 24 2c 33 29 29 | 0d 05 50 1d 24 28 62 6c |con$,3))|..P.$(bl|
|00000dc0| 6f 63 6b 25 2b 34 34 29 | 3d 73 61 76 65 6e 61 6d |ock%+44)|=savenam|
|00000dd0| 65 24 2b bd 30 0d 05 5a | 38 c8 99 22 57 69 6d 70 |e$+.0..Z|8.."Wimp|
|00000de0| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 38 |_SendMes|sage",18|
|00000df0| 2c 62 6c 6f 63 6b 25 2c | 64 65 73 74 68 61 6e 64 |,block%,|desthand|
|00000e00| 6c 65 25 2c 64 65 73 74 | 69 63 6f 6e 25 0d 05 64 |le%,dest|icon%..d|
|00000e10| 05 e1 0d 05 6e 04 0d 05 | 78 0f dd f2 70 6f 6c 6c |....n...|x...poll|
|00000e20| 5f 6d 65 6e 75 0d 05 82 | 0e c8 8e 20 6d 65 6e 75 |_menu...|... menu|
|00000e30| 24 20 ca 0d 05 8c 0f c9 | 22 69 63 6f 6e 62 61 72 |$ ......|"iconbar|
|00000e40| 22 3a 0d 05 96 11 20 c8 | 8e 20 21 62 6c 6f 63 6b |":.... .|. !block|
|00000e50| 25 20 ca 0d 05 a0 14 20 | c9 31 3a f4 20 73 74 61 |% ..... |.1:. sta|
|00000e60| 72 74 20 6f 76 65 72 0d | 05 aa 0e 20 20 f2 72 65 |rt over.|... .re|
|00000e70| 73 74 61 72 74 0d 05 b4 | 0e 20 c9 32 3a f4 20 71 |start...|. .2:. q|
|00000e80| 75 69 74 0d 05 be 14 20 | 20 71 75 69 74 25 3d ac |uit.... | quit%=.|
|00000e90| a4 63 61 6e 63 65 6c 0d | 05 c8 06 20 cb 0d 05 d2 |.cancel.|... ....|
|00000ea0| 10 c9 22 71 75 65 73 74 | 69 6f 6e 22 3a 0d 05 dc |.."quest|ion":...|
|00000eb0| 11 20 c8 8e 20 21 62 6c | 6f 63 6b 25 20 ca 0d 05 |. .. !bl|ock% ...|
|00000ec0| e6 13 20 c9 30 3a f4 20 | 75 6e 2d 61 6e 73 77 65 |.. .0:. |un-answe|
|00000ed0| 72 0d 05 f0 22 20 20 64 | 6f 6e 65 25 28 71 75 65 |r..." d|one%(que|
|00000ee0| 73 74 69 6f 6e 25 29 3d | a3 3a f2 71 75 65 73 74 |stion%)=|.:.quest|
|00000ef0| 69 6f 6e 0d 05 fa 14 20 | c9 31 3a f4 20 73 74 61 |ion.... |.1:. sta|
|00000f00| 72 74 20 6f 76 65 72 0d | 06 04 0e 20 20 f2 72 65 |rt over.|... .re|
|00000f10| 73 74 61 72 74 0d 06 0e | 0f 20 c9 32 3a f4 20 74 |start...|. .2:. t|
|00000f20| 79 70 65 73 0d 06 18 31 | 20 20 e7 62 6c 6f 63 6b |ypes...1| .block|
|00000f30| 25 21 34 3c 3e 2d 31 20 | f2 6f 70 65 6e 76 69 65 |%!4<>-1 |.openvie|
|00000f40| 77 28 74 79 70 65 73 24 | 28 62 6c 6f 63 6b 25 21 |w(types$|(block%!|
|00000f50| 34 2b 31 29 29 0d 06 22 | 1b 20 c9 33 3a f4 20 6f |4+1)).."|. .3:. o|
|00000f60| 74 68 65 72 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |ther inf|ormation|
|00000f70| 0d 06 2c 13 20 20 c8 8e | 20 62 6c 6f 63 6b 25 21 |..,. ..| block%!|
|00000f80| 34 20 ca 0d 06 36 1f 20 | 20 20 c9 30 3a f2 6f 70 |4 ...6. | .0:.op|
|00000f90| 65 6e 76 69 65 77 28 22 | 44 44 4c 49 2f 44 4f 43 |enview("|DDLI/DOC|
|00000fa0| 22 29 0d 06 40 1f 20 20 | 20 c9 31 3a f2 6f 70 65 |")..@. | .1:.ope|
|00000fb0| 6e 76 69 65 77 28 22 44 | 44 4c 49 2f 46 41 51 22 |nview("D|DLI/FAQ"|
|00000fc0| 29 0d 06 4a 20 20 20 20 | c9 32 3a f2 6f 70 65 6e |)..J |.2:.open|
|00000fd0| 76 69 65 77 28 22 50 54 | 53 34 32 2f 54 58 54 22 |view("PT|S42/TXT"|
|00000fe0| 29 0d 06 54 1e 20 20 20 | c9 33 3a f2 6f 70 65 6e |)..T. |.3:.open|
|00000ff0| 76 69 65 77 28 22 53 75 | 6d 6d 61 72 79 22 29 0d |view("Su|mmary").|
|00001000| 06 5e 1f 20 20 20 c9 34 | 3a f2 6f 70 65 6e 76 69 |.^. .4|:.openvi|
|00001010| 65 77 28 22 43 72 69 74 | 69 63 61 6c 22 29 0d 06 |ew("Crit|ical")..|
|00001020| 68 1e 20 20 20 c9 35 3a | f2 6f 70 65 6e 76 69 65 |h. .5:|.openvie|
|00001030| 77 28 22 5e 2e 21 48 65 | 6c 70 22 29 0d 06 72 07 |w("^.!He|lp")..r.|
|00001040| 20 20 cb 0d 06 7c 0e 20 | c9 34 3a f4 20 73 61 76 | ...|. |.4:. sav|
|00001050| 65 0d 06 86 4c 20 20 e7 | a7 73 61 76 65 6e 61 6d |e...L .|.savenam|
|00001060| 65 24 2c 22 2e 22 29 3d | 30 20 85 32 35 35 2c 22 |e$,".")=|0 .255,"|
|00001070| 54 6f 20 73 61 76 65 2c | 20 64 72 61 67 20 74 68 |To save,| drag th|
|00001080| 65 20 69 63 6f 6e 20 74 | 6f 20 61 20 64 69 72 65 |e icon t|o a dire|
|00001090| 63 74 6f 72 79 20 76 69 | 65 77 65 72 22 0d 06 90 |ctory vi|ewer"...|
|000010a0| 1a 20 20 f2 73 61 76 65 | 66 69 6c 65 28 73 61 76 |. .save|file(sav|
|000010b0| 65 6e 61 6d 65 24 29 0d | 06 9a 06 20 cb 0d 06 a4 |ename$).|... ....|
|000010c0| 0e c9 22 72 65 73 75 6c | 74 22 3a 0d 06 ae 11 20 |.."resul|t":.... |
|000010d0| c8 8e 20 21 62 6c 6f 63 | 6b 25 20 ca 0d 06 b8 13 |.. !bloc|k% .....|
|000010e0| 20 c9 30 3a f4 20 71 75 | 65 73 74 69 6f 6e 73 0d | .0:. qu|estions.|
|000010f0| 06 c2 38 20 20 21 62 6c | 6f 63 6b 25 3d 72 65 73 |..8 !bl|ock%=res|
|00001100| 75 6c 74 68 61 6e 64 6c | 65 25 3a c8 99 22 57 69 |ulthandl|e%:.."Wi|
|00001110| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00001120| 2c 62 6c 6f 63 6b 25 0d | 06 cc 22 20 20 f2 6f 70 |,block%.|.." .op|
|00001130| 65 6e 76 69 65 77 28 22 | 22 29 3a 72 65 73 75 6c |enview("|"):resul|
|00001140| 74 24 3d 22 58 58 58 58 | 22 0d 06 d6 1b 20 20 71 |t$="XXXX|".... q|
|00001150| 75 65 73 74 69 6f 6e 25 | 3d 31 3a f2 71 75 65 73 |uestion%|=1:.ques|
|00001160| 74 69 6f 6e 0d 06 e0 14 | 20 c9 31 3a f4 20 73 74 |tion....| .1:. st|
|00001170| 61 72 74 20 6f 76 65 72 | 0d 06 ea 0e 20 20 f2 72 |art over|.... .r|
|00001180| 65 73 74 61 72 74 0d 06 | f4 0f 20 c9 32 3a f4 20 |estart..|.. .2:. |
|00001190| 74 79 70 65 73 0d 06 fe | 14 20 20 e7 62 6c 6f 63 |types...|. .bloc|
|000011a0| 6b 25 21 34 3d 2d 31 20 | 8c 0d 07 08 2a 20 20 20 |k%!4=-1 |....* |
|000011b0| e7 a7 72 65 73 75 6c 74 | 24 2c 22 58 22 29 3d 30 |..result|$,"X")=0|
|000011c0| 20 f2 6f 70 65 6e 76 69 | 65 77 28 72 65 73 75 6c | .openvi|ew(resul|
|000011d0| 74 24 29 0d 07 12 07 20 | 20 cc 0d 07 1c 24 20 20 |t$).... | ....$ |
|000011e0| 20 f2 6f 70 65 6e 76 69 | 65 77 28 74 79 70 65 73 | .openvi|ew(types|
|000011f0| 24 28 62 6c 6f 63 6b 25 | 21 34 2b 31 29 29 0d 07 |$(block%|!4+1))..|
|00001200| 26 07 20 20 cd 0d 07 30 | 1b 20 c9 33 3a f4 20 6f |&. ...0|. .3:. o|
|00001210| 74 68 65 72 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |ther inf|ormation|
|00001220| 0d 07 3a 13 20 20 c8 8e | 20 62 6c 6f 63 6b 25 21 |..:. ..| block%!|
|00001230| 34 20 ca 0d 07 44 1f 20 | 20 20 c9 30 3a f2 6f 70 |4 ...D. | .0:.op|
|00001240| 65 6e 76 69 65 77 28 22 | 44 44 4c 49 2f 44 4f 43 |enview("|DDLI/DOC|
|00001250| 22 29 0d 07 4e 1f 20 20 | 20 c9 31 3a f2 6f 70 65 |")..N. | .1:.ope|
|00001260| 6e 76 69 65 77 28 22 44 | 44 4c 49 2f 46 41 51 22 |nview("D|DLI/FAQ"|
|00001270| 29 0d 07 58 20 20 20 20 | c9 32 3a f2 6f 70 65 6e |)..X |.2:.open|
|00001280| 76 69 65 77 28 22 50 54 | 53 34 32 2f 54 58 54 22 |view("PT|S42/TXT"|
|00001290| 29 0d 07 62 1e 20 20 20 | c9 33 3a f2 6f 70 65 6e |)..b. |.3:.open|
|000012a0| 76 69 65 77 28 22 53 75 | 6d 6d 61 72 79 22 29 0d |view("Su|mmary").|
|000012b0| 07 6c 1f 20 20 20 c9 34 | 3a f2 6f 70 65 6e 76 69 |.l. .4|:.openvi|
|000012c0| 65 77 28 22 43 72 69 74 | 69 63 61 6c 22 29 0d 07 |ew("Crit|ical")..|
|000012d0| 76 1e 20 20 20 c9 35 3a | f2 6f 70 65 6e 76 69 65 |v. .5:|.openvie|
|000012e0| 77 28 22 5e 2e 21 48 65 | 6c 70 22 29 0d 07 80 07 |w("^.!He|lp")....|
|000012f0| 20 20 cb 0d 07 8a 0e 20 | c9 34 3a f4 20 73 61 76 | ..... |.4:. sav|
|00001300| 65 0d 07 94 4c 20 20 e7 | a7 73 61 76 65 6e 61 6d |e...L .|.savenam|
|00001310| 65 24 2c 22 2e 22 29 3d | 30 20 85 32 35 35 2c 22 |e$,".")=|0 .255,"|
|00001320| 54 6f 20 73 61 76 65 2c | 20 64 72 61 67 20 74 68 |To save,| drag th|
|00001330| 65 20 69 63 6f 6e 20 74 | 6f 20 61 20 64 69 72 65 |e icon t|o a dire|
|00001340| 63 74 6f 72 79 20 76 69 | 65 77 65 72 22 0d 07 9e |ctory vi|ewer"...|
|00001350| 1a 20 20 f2 73 61 76 65 | 66 69 6c 65 28 73 61 76 |. .save|file(sav|
|00001360| 65 6e 61 6d 65 24 29 0d | 07 a8 06 20 cb 0d 07 b2 |ename$).|... ....|
|00001370| 05 cb 0d 07 bc 05 e1 0d | 07 c6 04 0d 07 d0 12 dd |........|........|
|00001380| f2 70 6f 6c 6c 5f 6d 65 | 73 73 61 67 65 0d 07 da |.poll_me|ssage...|
|00001390| 15 ea 69 24 2c 68 61 6e | 64 6c 65 25 2c 78 25 2c |..i$,han|dle%,x%,|
|000013a0| 79 25 0d 07 e4 12 c8 8e | 20 62 6c 6f 63 6b 25 21 |y%......| block%!|
|000013b0| 31 36 20 ca 0d 07 ee 0d | c9 30 3a f4 20 51 75 69 |16 .....|.0:. Qui|
|000013c0| 74 0d 07 f8 0c 20 71 75 | 69 74 25 3d b9 0d 08 02 |t.... qu|it%=....|
|000013d0| 14 c9 32 3a f4 20 44 61 | 74 61 53 61 76 65 41 63 |..2:. Da|taSaveAc|
|000013e0| 6b 0d 08 0c 25 20 73 61 | 76 65 6e 61 6d 65 24 3d |k...% sa|vename$=|
|000013f0| a4 7a 65 72 6f 73 74 72 | 69 6e 67 28 62 6c 6f 63 |.zerostr|ing(bloc|
|00001400| 6b 25 2b 34 34 29 0d 08 | 16 22 20 f4 20 6e 6f 77 |k%+44)..|." . now|
|00001410| 20 73 65 6e 64 20 61 20 | 44 61 74 61 4c 6f 61 64 | send a |DataLoad|
|00001420| 20 6d 65 73 73 61 67 65 | 0d 08 20 23 20 62 6c 6f | message|.. # blo|
|00001430| 63 6b 25 21 31 32 3d 62 | 6c 6f 63 6b 25 21 38 3a |ck%!12=b|lock%!8:|
|00001440| 62 6c 6f 63 6b 25 21 31 | 36 3d 33 0d 08 2a 2c 20 |block%!1|6=3..*, |
|00001450| c8 99 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |.."Wimp_|SendMess|
|00001460| 61 67 65 22 2c 31 38 2c | 62 6c 6f 63 6b 25 2c 62 |age",18,|block%,b|
|00001470| 6c 6f 63 6b 25 21 34 0d | 08 34 1d 20 24 73 61 76 |lock%!4.|.4. $sav|
|00001480| 65 6e 61 6d 65 69 63 6f | 6e 25 3d 73 61 76 65 6e |enameico|n%=saven|
|00001490| 61 6d 65 24 0d 08 3e 19 | 20 f2 73 61 76 65 66 69 |ame$..>.| .savefi|
|000014a0| 6c 65 28 73 61 76 65 6e | 61 6d 65 24 29 0d 08 48 |le(saven|ame$)..H|
|000014b0| 1c 20 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |. .."Wim|p_Create|
|000014c0| 4d 65 6e 75 22 2c 2c 2d | 31 0d 08 52 11 c9 33 3a |Menu",,-|1..R..3:|
|000014d0| f4 20 44 61 74 61 4c 6f | 61 64 0d 08 5c 17 20 e7 |. DataLo|ad..\. .|
|000014e0| 62 6c 6f 63 6b 25 21 34 | 30 3c 26 31 30 30 30 20 |block%!4|0<&1000 |
|000014f0| 8c 0d 08 66 1f 20 20 69 | 24 3d a4 7a 65 72 6f 73 |...f. i|$=.zeros|
|00001500| 74 72 69 6e 67 28 62 6c | 6f 63 6b 25 2b 34 34 29 |tring(bl|ock%+44)|
|00001510| 0d 08 70 13 20 20 f2 6c | 6f 61 64 66 69 6c 65 28 |..p. .l|oadfile(|
|00001520| 69 24 29 0d 08 7a 37 20 | 20 21 62 6c 6f 63 6b 25 |i$)..z7 | !block%|
|00001530| 3d 69 6e 74 72 6f 68 61 | 6e 64 6c 65 25 3a c8 99 |=introha|ndle%:..|
|00001540| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00001550| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 08 84 38 20 20 |w",,bloc|k%...8 |
|00001560| 21 62 6c 6f 63 6b 25 3d | 72 65 73 75 6c 74 68 61 |!block%=|resultha|
|00001570| 6e 64 6c 65 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |ndle%:..|"Wimp_Cl|
|00001580| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00001590| 6b 25 0d 08 8e 16 20 20 | 71 75 65 73 74 69 6f 6e |k%.... |question|
|000015a0| 25 3d 6e 68 65 72 65 25 | 0d 08 98 18 20 20 f2 6e |%=nhere%|.... .n|
|000015b0| 65 78 74 71 75 65 73 74 | 69 6f 6e 28 31 2c b9 29 |extquest|ion(1,.)|
|000015c0| 0d 08 a2 41 20 20 e7 71 | 75 65 73 74 69 6f 6e 25 |...A .q|uestion%|
|000015d0| 3c 3e 6e 68 65 72 65 25 | 2b 31 20 f2 71 75 65 73 |<>nhere%|+1 .ques|
|000015e0| 74 69 6f 6e 20 8b f2 63 | 6c 6f 73 65 71 75 65 73 |tion ..c|loseques|
|000015f0| 74 69 6f 6e 73 3a f2 6f | 70 65 6e 72 65 73 75 6c |tions:.o|penresul|
|00001600| 74 0d 08 ac 06 20 cd 0d | 08 b6 19 c9 26 34 30 30 |t.... ..|....&400|
|00001610| 43 30 3a f4 20 4d 65 6e | 75 57 61 72 6e 69 6e 67 |C0:. Men|uWarning|
|00001620| 0d 08 c0 30 20 68 61 6e | 64 6c 65 25 3d 62 6c 6f |...0 han|dle%=blo|
|00001630| 63 6b 25 21 32 30 3a 78 | 25 3d 62 6c 6f 63 6b 25 |ck%!20:x|%=block%|
|00001640| 21 32 34 3a 79 25 3d 62 | 6c 6f 63 6b 25 21 32 38 |!24:y%=b|lock%!28|
|00001650| 0d 08 ca 11 20 c8 8e 20 | 68 61 6e 64 6c 65 25 20 |.... .. |handle% |
|00001660| ca 0d 08 d4 12 20 c9 73 | 61 76 65 68 61 6e 64 6c |..... .s|avehandl|
|00001670| 65 25 3a 0d 08 de 20 20 | 20 24 73 61 76 65 73 70 |e%:... | $savesp|
|00001680| 72 69 74 65 69 63 6f 6e | 25 3d 73 61 76 65 69 63 |riteicon|%=saveic|
|00001690| 6f 6e 24 0d 08 e8 1e 20 | 20 24 73 61 76 65 6e 61 |on$.... | $savena|
|000016a0| 6d 65 69 63 6f 6e 25 3d | 73 61 76 65 6e 61 6d 65 |meicon%=|savename|
|000016b0| 24 0d 08 f2 06 20 cb 0d | 08 fc 2a 20 c8 99 22 57 |$.... ..|..* .."W|
|000016c0| 69 6d 70 5f 43 72 65 61 | 74 65 53 75 62 4d 65 6e |imp_Crea|teSubMen|
|000016d0| 75 22 2c 2c 68 61 6e 64 | 6c 65 25 2c 78 25 2c 79 |u",,hand|le%,x%,y|
|000016e0| 25 0d 09 06 05 cb 0d 09 | 10 05 e1 0d 09 1a 04 0d |%.......|........|
|000016f0| 09 24 0c dd f2 72 65 64 | 72 61 77 0d 09 2e 2d f4 |.$...red|raw...-.|
|00001700| 20 77 6f 72 6b 20 61 72 | 65 61 20 6f 72 69 67 69 | work ar|ea origi|
|00001710| 6e 20 69 6e 20 73 63 72 | 65 65 6e 20 63 6f 2d 6f |n in scr|een co-o|
|00001720| 72 64 69 6e 61 74 65 73 | 0d 09 38 32 78 6f 25 3d |rdinates|..82xo%=|
|00001730| 62 6c 6f 63 6b 25 21 34 | 2d 62 6c 6f 63 6b 25 21 |block%!4|-block%!|
|00001740| 32 30 3a 79 6f 25 3d 62 | 6c 6f 63 6b 25 21 31 36 |20:yo%=b|lock%!16|
|00001750| 2d 62 6c 6f 63 6b 25 21 | 32 34 0d 09 42 42 f4 20 |-block%!|24..BB. |
|00001760| 72 65 64 72 61 77 20 72 | 65 63 74 61 6e 67 6c 65 |redraw r|ectangle|
|00001770| 20 72 65 6c 61 74 69 76 | 65 20 74 6f 20 77 6f 72 | relativ|e to wor|
|00001780| 6b 20 61 72 65 61 20 6f | 72 69 67 69 6e 2c 20 69 |k area o|rigin, i|
|00001790| 6e 20 63 68 61 72 61 63 | 74 65 72 73 0d 09 4c 1b |n charac|ters..L.|
|000017a0| 79 30 25 3d 28 79 6f 25 | 2d 62 6c 6f 63 6b 25 21 |y0%=(yo%|-block%!|
|000017b0| 31 36 29 20 81 33 32 0d | 09 56 33 79 31 25 3d 28 |16) .32.|.V3y1%=(|
|000017c0| 79 6f 25 2d 62 6c 6f 63 | 6b 25 21 34 30 29 20 81 |yo%-bloc|k%!40) .|
|000017d0| 33 32 3a 79 32 25 3d 28 | 79 6f 25 2d 62 6c 6f 63 |32:y2%=(|yo%-bloc|
|000017e0| 6b 25 21 33 32 29 20 81 | 33 32 0d 09 60 10 e7 79 |k%!32) .|32..`..y|
|000017f0| 31 25 3c 30 20 79 31 25 | 3d 30 0d 09 6a 1e e7 79 |1%<0 y1%|=0..j..y|
|00001800| 32 25 3e 76 69 65 77 79 | 25 2d 31 20 79 32 25 3d |2%>viewy|%-1 y2%=|
|00001810| 76 69 65 77 79 25 2d 31 | 0d 09 74 11 f2 66 69 6e |viewy%-1|..t..fin|
|00001820| 64 76 69 65 77 6c 69 6e | 65 0d 09 7e 10 e3 69 25 |dviewlin|e..~..i%|
|00001830| 3d 79 31 25 20 b8 79 32 | 25 0d 09 88 18 20 ec 34 |=y1% .y2|%.... .4|
|00001840| 2b 78 6f 25 2c 2d 34 2b | 79 6f 25 2d 33 32 2a 69 |+xo%,-4+|yo%-32*i|
|00001850| 25 0d 09 92 0e 20 69 24 | 3d be 23 76 63 68 25 0d |%.... i$|=.#vch%.|
|00001860| 09 9c 08 20 f1 69 24 0d | 09 a6 05 ed 0d 09 b0 05 |... .i$.|........|
|00001870| e1 0d 09 ba 04 0d 09 c4 | 0d dd f2 72 65 73 74 61 |........|...resta|
|00001880| 72 74 0d 09 ce 0e e7 a4 | 63 61 6e 63 65 6c 20 e1 |rt......|cancel .|
|00001890| 0d 09 d8 11 f2 6f 70 65 | 6e 76 69 65 77 28 22 22 |.....ope|nview(""|
|000018a0| 29 0d 09 e2 36 21 62 6c | 6f 63 6b 25 3d 72 65 73 |)...6!bl|ock%=res|
|000018b0| 75 6c 74 68 61 6e 64 6c | 65 25 3a c8 99 22 57 69 |ulthandl|e%:.."Wi|
|000018c0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000018d0| 2c 62 6c 6f 63 6b 25 0d | 09 ec 38 21 62 6c 6f 63 |,block%.|..8!bloc|
|000018e0| 6b 25 3d 71 75 65 73 74 | 69 6f 6e 68 61 6e 64 6c |k%=quest|ionhandl|
|000018f0| 65 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |e%:.."Wi|mp_Close|
|00001900| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00001910| 09 f6 24 71 75 65 73 74 | 69 6f 6e 25 3d 30 3a 64 |..$quest|ion%=0:d|
|00001920| 6f 6e 65 25 28 29 3d a3 | 3a f2 6f 70 65 6e 69 6e |one%()=.|:.openin|
|00001930| 74 72 6f 0d 0a 00 05 e1 | 0d 0a 0a 04 0d 0a 14 0c |tro.....|........|
|00001940| dd a4 63 61 6e 63 65 6c | 0d 0a 1e 2d f4 20 72 65 |..cancel|...-. re|
|00001950| 74 75 72 6e 73 20 54 52 | 55 45 20 74 6f 20 6b 65 |turns TR|UE to ke|
|00001960| 65 70 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 73 |ep the c|urrent s|
|00001970| 63 6f 72 65 73 0d 0a 28 | 0d ea 69 25 2c 6c 6f 73 |cores..(|..i%,los|
|00001980| 73 25 0d 0a 32 0b 6c 6f | 73 73 25 3d a3 0d 0a 3c |s%..2.lo|ss%=...<|
|00001990| 11 e3 69 25 3d 31 20 b8 | 6e 68 65 72 65 25 0d 0a |..i%=1 .|nhere%..|
|000019a0| 46 1b 20 6c 6f 73 73 25 | 3d 6c 6f 73 73 25 20 84 |F. loss%|=loss% .|
|000019b0| 64 6f 6e 65 25 28 69 25 | 29 0d 0a 50 05 ed 0d 0a |done%(i%|)..P....|
|000019c0| 5a 93 e7 6c 6f 73 73 25 | 20 8c 20 3d 28 a4 72 65 |Z..loss%| . =(.re|
|000019d0| 70 6f 72 74 28 22 57 61 | 72 6e 69 6e 67 20 66 72 |port("Wa|rning fr|
|000019e0| 6f 6d 20 22 2b 74 61 73 | 6b 24 2b 22 3a 22 2c 22 |om "+tas|k$+":","|
|000019f0| 54 68 65 20 61 6e 73 77 | 65 72 73 20 79 6f 75 20 |The answ|ers you |
|00001a00| 68 61 76 65 20 61 6c 72 | 65 61 64 79 20 67 69 76 |have alr|eady giv|
|00001a10| 65 6e 20 77 69 6c 6c 20 | 62 65 20 66 6f 72 67 6f |en will |be forgo|
|00001a20| 74 74 65 6e 21 20 44 6f | 20 79 6f 75 20 72 65 61 |tten! Do| you rea|
|00001a30| 6c 6c 79 20 77 61 6e 74 | 20 74 6f 20 70 72 6f 63 |lly want| to proc|
|00001a40| 65 65 64 3f 22 2c 25 31 | 30 30 31 31 29 3c 3e 31 |eed?",%1|0011)<>1|
|00001a50| 29 0d 0a 64 06 3d a3 0d | 0a 6e 04 0d 0a 78 11 dd |)..d.=..|.n...x..|
|00001a60| f2 73 74 61 72 74 61 73 | 6b 69 6e 67 0d 0a 82 0a |.startas|king....|
|00001a70| ea 69 25 2c 6a 25 0d 0a | 8c 0e 6a 25 3d 30 2a b3 |.i%,j%..|..j%=0*.|
|00001a80| 28 2d 91 29 0d 0a 96 11 | e3 69 25 3d 31 20 b8 6e |(-.)....|.i%=1 .n|
|00001a90| 68 65 72 65 25 0d 0a a0 | 1d 6a 25 2b 3d 31 3a c8 |here%...|.j%+=1:.|
|00001aa0| 95 71 24 28 6a 25 29 3d | 22 22 3a 6a 25 2b 3d 31 |.q$(j%)=|"":j%+=1|
|00001ab0| 3a ce 0d 0a aa 0f 6d 69 | 78 25 28 69 25 29 3d 6a |:.....mi|x%(i%)=j|
|00001ac0| 25 0d 0a b4 05 ed 0d 0a | be 13 e3 69 25 3d 31 20 |%.......|...i%=1 |
|00001ad0| b8 6e 68 65 72 65 25 2d | 31 0d 0a c8 16 20 6a 25 |.nhere%-|1.... j%|
|00001ae0| 3d b3 28 6e 68 65 72 65 | 25 2b 31 2d 69 25 29 0d |=.(nhere|%+1-i%).|
|00001af0| 0a d2 16 20 61 73 6b 25 | 28 69 25 29 3d 6d 69 78 |... ask%|(i%)=mix|
|00001b00| 25 28 6a 25 29 0d 0a dc | 1f 20 6d 69 78 25 28 6a |%(j%)...|. mix%(j|
|00001b10| 25 29 3d 6d 69 78 25 28 | 6e 68 65 72 65 25 2b 31 |%)=mix%(|nhere%+1|
|00001b20| 2d 69 25 29 0d 0a e6 05 | ed 0d 0a f0 18 61 73 6b |-i%)....|.....ask|
|00001b30| 25 28 6e 68 65 72 65 25 | 29 3d 6d 69 78 25 28 31 |%(nhere%|)=mix%(1|
|00001b40| 29 0d 0a fa 32 f4 20 6d | 69 78 25 28 29 20 68 61 |)...2. m|ix%() ha|
|00001b50| 73 20 68 61 64 20 61 20 | 74 65 6d 70 6f 72 61 72 |s had a |temporar|
|00001b60| 79 20 75 73 65 20 75 70 | 20 74 6f 20 68 65 72 65 |y use up| to here|
|00001b70| 2e 2e 2e 0d 0b 04 25 e3 | 69 25 3d 31 20 b8 6e 68 |......%.|i%=1 .nh|
|00001b80| 65 72 65 25 3a 6d 69 78 | 25 28 69 25 29 3d 32 2a |ere%:mix|%(i%)=2*|
|00001b90| b3 28 32 29 2d 33 3a ed | 0d 0b 0e 1c 64 6f 6e 65 |.(2)-3:.|....done|
|00001ba0| 25 28 29 3d a3 3a 72 65 | 73 75 6c 74 24 3d 22 58 |%()=.:re|sult$="X|
|00001bb0| 58 58 58 22 0d 0b 18 3c | f4 20 64 6f 6e 65 25 28 |XXX"...<|. done%(|
|00001bc0| 29 3d 54 52 55 45 3a 61 | 6e 73 77 65 72 25 28 29 |)=TRUE:a|nswer%()|
|00001bd0| 3d 33 3a 64 6f 6e 65 25 | 28 31 29 3d 46 41 4c 53 |=3:done%|(1)=FALS|
|00001be0| 45 3a 64 6f 6e 65 25 28 | 32 29 3d 46 41 4c 53 45 |E:done%(|2)=FALSE|
|00001bf0| 0d 0b 22 0f 71 75 65 73 | 74 69 6f 6e 25 3d 31 0d |..".ques|tion%=1.|
|00001c00| 0b 2c 0d f2 71 75 65 73 | 74 69 6f 6e 0d 0b 36 05 |.,..ques|tion..6.|
|00001c10| e1 0d 0b 40 04 0d 0b 4a | 0e dd f2 71 75 65 73 74 |...@...J|...quest|
|00001c20| 69 6f 6e 0d 0b 54 1f ea | 78 31 25 2c 79 31 25 2c |ion..T..|x1%,y1%,|
|00001c30| 78 32 25 2c 79 32 25 2c | 71 73 74 25 2c 61 24 2c |x2%,y2%,|qst%,a$,|
|00001c40| 62 24 0d 0b 5e 18 71 73 | 74 25 3d 61 73 6b 25 28 |b$..^.qs|t%=ask%(|
|00001c50| 71 75 65 73 74 69 6f 6e | 25 29 0d 0b 68 37 61 24 |question|%)..h7a$|
|00001c60| 3d 61 24 28 71 73 74 25 | 29 3a 62 24 3d 62 24 28 |=a$(qst%|):b$=b$(|
|00001c70| 71 73 74 25 29 3a e7 6d | 69 78 25 28 71 75 65 73 |qst%):.m|ix%(ques|
|00001c80| 74 69 6f 6e 25 29 3d 2d | 31 20 c8 94 61 24 2c 62 |tion%)=-|1 ..a$,b|
|00001c90| 24 0d 0b 72 19 f2 69 63 | 6f 6e 74 65 78 74 28 71 |$..r..ic|ontext(q|
|00001ca0| 24 28 71 73 74 25 29 2c | 30 29 0d 0b 7c 13 f2 69 |$(qst%),|0)..|..i|
|00001cb0| 63 6f 6e 74 65 78 74 28 | 61 24 2c 31 29 0d 0b 86 |context(|a$,1)...|
|00001cc0| 13 f2 69 63 6f 6e 74 65 | 78 74 28 62 24 2c 32 29 |..iconte|xt(b$,2)|
|00001cd0| 0d 0b 90 2c 24 74 69 74 | 6c 65 62 75 66 66 65 72 |...,$tit|lebuffer|
|00001ce0| 25 3d 22 51 75 65 73 74 | 69 6f 6e 20 22 2b c3 71 |%="Quest|ion "+.q|
|00001cf0| 75 65 73 74 69 6f 6e 25 | 2b bd 31 33 0d 0b 9a 39 |uestion%|+.13...9|
|00001d00| f2 73 65 74 71 75 65 73 | 74 69 6f 6e 69 63 6f 6e |.setques|tionicon|
|00001d10| 28 61 6e 73 77 65 72 25 | 28 71 75 65 73 74 69 6f |(answer%|(questio|
|00001d20| 6e 25 29 2c 64 6f 6e 65 | 25 28 71 75 65 73 74 69 |n%),done|%(questi|
|00001d30| 6f 6e 25 29 29 0d 0b a4 | 1b 21 62 6c 6f 63 6b 25 |on%))...|.!block%|
|00001d40| 3d 71 75 65 73 74 69 6f | 6e 68 61 6e 64 6c 65 25 |=questio|nhandle%|
|00001d50| 0d 0b ae 23 c8 99 22 57 | 69 6d 70 5f 47 65 74 57 |...#.."W|imp_GetW|
|00001d60| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 6c 6f |indowSta|te",,blo|
|00001d70| 63 6b 25 0d 0b b8 39 78 | 31 25 3d 62 6c 6f 63 6b |ck%...9x|1%=block|
|00001d80| 25 21 34 3a 79 31 25 3d | 62 6c 6f 63 6b 25 21 38 |%!4:y1%=|block%!8|
|00001d90| 3a 78 32 25 3d 62 6c 6f | 63 6b 25 21 31 32 3a 79 |:x2%=blo|ck%!12:y|
|00001da0| 32 25 3d 62 6c 6f 63 6b | 25 21 31 36 0d 0b c2 2e |2%=block|%!16....|
|00001db0| c8 99 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |.."Wimp_|ForceRed|
|00001dc0| 72 61 77 22 2c 2d 31 2c | 78 31 25 2c 79 32 25 2c |raw",-1,|x1%,y2%,|
|00001dd0| 78 32 25 2c 79 32 25 2b | 34 34 0d 0b cc 3c c8 99 |x2%,y2%+|44...<..|
|00001de0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00001df0| 77 22 2c 71 75 65 73 74 | 69 6f 6e 68 61 6e 64 6c |w",quest|ionhandl|
|00001e00| 65 25 2c 71 78 31 25 2c | 71 79 31 25 2c 71 78 32 |e%,qx1%,|qy1%,qx2|
|00001e10| 25 2c 71 79 32 25 0d 0b | d6 3c c8 99 22 57 69 6d |%,qy2%..|.<.."Wim|
|00001e20| 70 5f 46 6f 72 63 65 52 | 65 64 72 61 77 22 2c 71 |p_ForceR|edraw",q|
|00001e30| 75 65 73 74 69 6f 6e 68 | 61 6e 64 6c 65 25 2c 61 |uestionh|andle%,a|
|00001e40| 78 31 25 2c 61 79 31 25 | 2c 61 78 32 25 2c 61 79 |x1%,ay1%|,ax2%,ay|
|00001e50| 32 25 0d 0b e0 3c c8 99 | 22 57 69 6d 70 5f 46 6f |2%...<..|"Wimp_Fo|
|00001e60| 72 63 65 52 65 64 72 61 | 77 22 2c 71 75 65 73 74 |rceRedra|w",quest|
|00001e70| 69 6f 6e 68 61 6e 64 6c | 65 25 2c 62 78 31 25 2c |ionhandl|e%,bx1%,|
|00001e80| 62 79 31 25 2c 62 78 32 | 25 2c 62 79 32 25 0d 0b |by1%,bx2|%,by2%..|
|00001e90| ea 1f c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |...."Wim|p_OpenWi|
|00001ea0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0b f4 |ndow",,b|lock%...|
|00001eb0| 05 e1 0d 0b fe 04 0d 0c | 08 1b dd f2 69 63 6f 6e |........|....icon|
|00001ec0| 74 65 78 74 28 74 65 78 | 74 24 2c 70 61 72 74 25 |text(tex|t$,part%|
|00001ed0| 29 0d 0c 12 1b ea 69 63 | 6f 6e 25 2c 62 72 65 61 |).....ic|on%,brea|
|00001ee0| 6b 31 25 2c 62 72 65 61 | 6b 32 25 2c 0d 0c 1c 0e |k1%,brea|k2%,....|
|00001ef0| c8 8e 20 70 61 72 74 25 | 20 ca 0d 0c 26 11 c9 30 |.. part%| ...&..0|
|00001f00| 3a f4 20 71 75 65 73 74 | 69 6f 6e 0d 0c 30 29 20 |:. quest|ion..0) |
|00001f10| 62 72 65 61 6b 31 25 3d | a4 62 72 65 61 6b 28 74 |break1%=|.break(t|
|00001f20| 65 78 74 24 2c 34 36 29 | 3a 62 72 65 61 6b 32 25 |ext$,46)|:break2%|
|00001f30| 3d 32 35 35 0d 0c 3a 21 | 20 69 63 6f 6e 25 3d 30 |=255..:!| icon%=0|
|00001f40| 3a e7 62 72 65 61 6b 31 | 25 3d 32 35 35 20 69 63 |:.break1|%=255 ic|
|00001f50| 6f 6e 25 3d 31 0d 0c 44 | 22 20 24 71 69 63 6f 6e |on%=1..D|" $qicon|
|00001f60| 25 28 30 29 3d bd 31 33 | 3a 24 71 69 63 6f 6e 25 |%(0)=.13|:$qicon%|
|00001f70| 28 31 29 3d bd 31 33 0d | 0c 4e 15 c9 31 3a f4 20 |(1)=.13.|.N..1:. |
|00001f80| 66 69 72 73 74 20 61 6e | 73 77 65 72 0d 0c 58 1d |first an|swer..X.|
|00001f90| 20 62 72 65 61 6b 31 25 | 3d a4 62 72 65 61 6b 28 | break1%|=.break(|
|00001fa0| 74 65 78 74 24 2c 33 35 | 29 0d 0c 62 3f 20 e7 62 |text$,35|)..b? .b|
|00001fb0| 72 65 61 6b 31 25 3c 32 | 35 35 20 62 72 65 61 6b |reak1%<2|55 break|
|00001fc0| 32 25 3d a4 62 72 65 61 | 6b 28 74 65 78 74 24 2c |2%=.brea|k(text$,|
|00001fd0| 62 72 65 61 6b 31 25 2b | 33 35 29 20 8b 62 72 65 |break1%+|35) .bre|
|00001fe0| 61 6b 32 25 3d 32 35 35 | 0d 0c 6c 36 20 69 63 6f |ak2%=255|..l6 ico|
|00001ff0| 6e 25 3d 32 3a e7 62 72 | 65 61 6b 32 25 3d 32 35 |n%=2:.br|eak2%=25|
|00002000| 35 20 69 63 6f 6e 25 3d | 33 3a e7 62 72 65 61 6b |5 icon%=|3:.break|
|00002010| 31 25 3d 32 35 35 20 69 | 63 6f 6e 25 3d 34 0d 0c |1%=255 i|con%=4..|
|00002020| 76 31 20 24 71 69 63 6f | 6e 25 28 32 29 3d bd 31 |v1 $qico|n%(2)=.1|
|00002030| 33 3a 24 71 69 63 6f 6e | 25 28 33 29 3d bd 31 33 |3:$qicon|%(3)=.13|
|00002040| 3a 24 71 69 63 6f 6e 25 | 28 34 29 3d bd 31 33 0d |:$qicon%|(4)=.13.|
|00002050| 0c 80 16 c9 32 3a f4 20 | 73 65 63 6f 6e 64 20 61 |....2:. |second a|
|00002060| 6e 73 77 65 72 0d 0c 8a | 1d 20 62 72 65 61 6b 31 |nswer...|. break1|
|00002070| 25 3d a4 62 72 65 61 6b | 28 74 65 78 74 24 2c 33 |%=.break|(text$,3|
|00002080| 35 29 0d 0c 94 3f 20 e7 | 62 72 65 61 6b 31 25 3c |5)...? .|break1%<|
|00002090| 32 35 35 20 62 72 65 61 | 6b 32 25 3d a4 62 72 65 |255 brea|k2%=.bre|
|000020a0| 61 6b 28 74 65 78 74 24 | 2c 62 72 65 61 6b 31 25 |ak(text$|,break1%|
|000020b0| 2b 33 35 29 20 8b 62 72 | 65 61 6b 32 25 3d 32 35 |+35) .br|eak2%=25|
|000020c0| 35 0d 0c 9e 0c 20 69 63 | 6f 6e 25 3d 35 0d 0c a8 |5.... ic|on%=5...|
|000020d0| 31 20 24 71 69 63 6f 6e | 25 28 35 29 3d bd 31 33 |1 $qicon|%(5)=.13|
|000020e0| 3a 24 71 69 63 6f 6e 25 | 28 36 29 3d bd 31 33 3a |:$qicon%|(6)=.13:|
|000020f0| 24 71 69 63 6f 6e 25 28 | 37 29 3d bd 31 33 0d 0c |$qicon%(|7)=.13..|
|00002100| b2 05 cb 0d 0c bc 33 24 | 71 69 63 6f 6e 25 28 69 |......3$|qicon%(i|
|00002110| 63 6f 6e 25 29 3d c0 74 | 65 78 74 24 2c 62 72 65 |con%)=.t|ext$,bre|
|00002120| 61 6b 31 25 2d 31 29 3a | e7 62 72 65 61 6b 31 25 |ak1%-1):|.break1%|
|00002130| 3d 32 35 35 20 e1 0d 0c | c6 47 24 71 69 63 6f 6e |=255 ...|.G$qicon|
|00002140| 25 28 69 63 6f 6e 25 2b | 31 29 3d c1 74 65 78 74 |%(icon%+|1)=.text|
|00002150| 24 2c 62 72 65 61 6b 31 | 25 2b 31 2c 62 72 65 61 |$,break1|%+1,brea|
|00002160| 6b 32 25 2d 62 72 65 61 | 6b 31 25 2d 31 29 3a e7 |k2%-brea|k1%-1):.|
|00002170| 62 72 65 61 6b 32 25 3d | 32 35 35 20 e1 0d 0c d0 |break2%=|255 ....|
|00002180| 26 24 71 69 63 6f 6e 25 | 28 69 63 6f 6e 25 2b 32 |&$qicon%|(icon%+2|
|00002190| 29 3d c1 74 65 78 74 24 | 2c 62 72 65 61 6b 32 25 |)=.text$|,break2%|
|000021a0| 2b 31 29 0d 0c da 05 e1 | 0d 0c e4 04 0d 0c ee 12 |+1).....|........|
|000021b0| dd a4 62 72 65 61 6b 28 | 69 24 2c 6c 25 29 0d 0c |..break(|i$,l%)..|
|000021c0| f8 11 e7 a9 69 24 3c 3d | 6c 25 20 3d 32 35 35 0d |....i$<=|l% =255.|
|000021d0| 0d 02 14 69 25 3d a7 69 | 24 2c 22 20 22 2c 6c 25 |...i%=.i|$," ",l%|
|000021e0| 2b 31 29 0d 0d 0c 0e e7 | 69 25 3d 30 20 3d 32 35 |+1).....|i%=0 =25|
|000021f0| 35 0d 0d 16 07 3d 69 25 | 0d 0d 20 04 0d 0d 2a 24 |5....=i%|.. ...*$|
|00002200| dd f2 73 65 74 71 75 65 | 73 74 69 6f 6e 69 63 6f |..setque|stionico|
|00002210| 6e 28 61 6e 73 77 65 72 | 25 2c 64 6f 6e 65 25 29 |n(answer|%,done%)|
|00002220| 0d 0d 34 2b 21 62 6c 6f | 63 6b 25 3d 71 75 65 73 |..4+!blo|ck%=ques|
|00002230| 74 69 6f 6e 68 61 6e 64 | 6c 65 25 3a 62 6c 6f 63 |tionhand|le%:bloc|
|00002240| 6b 25 21 31 32 3d 31 3c | 3c 32 31 0d 0d 3e 12 e7 |k%!12=1<|<21..>..|
|00002250| 73 65 6c 65 63 74 69 63 | 6f 6e 25 20 8c 0d 0d 48 |selectic|on% ...H|
|00002260| 24 20 62 6c 6f 63 6b 25 | 21 34 3d 73 65 6c 65 63 |$ block%|!4=selec|
|00002270| 74 69 63 6f 6e 25 3a 62 | 6c 6f 63 6b 25 21 38 3d |ticon%:b|lock%!8=|
|00002280| 30 0d 0d 52 22 20 c8 99 | 22 57 69 6d 70 5f 53 65 |0..R" ..|"Wimp_Se|
|00002290| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|000022a0| 63 6b 25 0d 0d 5c 12 20 | 73 65 6c 65 63 74 69 63 |ck%..\. |selectic|
|000022b0| 6f 6e 25 3d 30 0d 0d 66 | 05 cd 0d 0d 70 0c e7 64 |on%=0..f|....p..d|
|000022c0| 6f 6e 65 25 20 8c 0d 0d | 7a 1b 20 73 65 6c 65 63 |one% ...|z. selec|
|000022d0| 74 69 63 6f 6e 25 3d 31 | 35 2b 61 6e 73 77 65 72 |ticon%=1|5+answer|
|000022e0| 25 0d 0d 84 28 20 62 6c | 6f 63 6b 25 21 34 3d 73 |%...( bl|ock%!4=s|
|000022f0| 65 6c 65 63 74 69 63 6f | 6e 25 3a 62 6c 6f 63 6b |electico|n%:block|
|00002300| 25 21 38 3d 31 3c 3c 32 | 31 0d 0d 8e 22 20 c8 99 |%!8=1<<2|1..." ..|
|00002310| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00002320| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 0d 0d 98 05 cd |te",,blo|ck%.....|
|00002330| 0d 0d a2 05 e1 0d 0d ac | 04 0d 0d b6 24 dd f2 6e |........|....$..n|
|00002340| 65 78 74 71 75 65 73 74 | 69 6f 6e 28 64 69 72 65 |extquest|ion(dire|
|00002350| 63 74 69 6f 6e 25 2c 73 | 6b 69 70 25 29 0d 0d c0 |ction%,s|kip%)...|
|00002360| 07 ea 69 25 0d 0d ca 0c | e7 73 6b 69 70 25 20 8c |..i%....|.skip% .|
|00002370| 0d 0d d4 11 20 69 25 3d | 71 75 65 73 74 69 6f 6e |.... i%=|question|
|00002380| 25 0d 0d de 06 20 f5 0d | 0d e8 2d 20 20 69 25 3d |%.... ..|..- i%=|
|00002390| 28 28 69 25 2b 64 69 72 | 65 63 74 69 6f 6e 25 2b |((i%+dir|ection%+|
|000023a0| 6e 68 65 72 65 25 2d 31 | 29 20 83 6e 68 65 72 65 |nhere%-1|) .nhere|
|000023b0| 25 29 2b 31 0d 0d f2 1e | 20 fd ac 64 6f 6e 65 25 |%)+1....| ..done%|
|000023c0| 28 69 25 29 20 84 69 25 | 3d 71 75 65 73 74 69 6f |(i%) .i%|=questio|
|000023d0| 6e 25 0d 0d fc 31 20 e7 | ac 64 6f 6e 65 25 28 69 |n%...1 .|.done%(i|
|000023e0| 25 29 20 71 75 65 73 74 | 69 6f 6e 25 3d 69 25 20 |%) quest|ion%=i% |
|000023f0| 8b 71 75 65 73 74 69 6f | 6e 25 3d 6e 68 65 72 65 |.questio|n%=nhere|
|00002400| 25 2b 31 0d 0e 06 05 cc | 0d 0e 10 3a 20 71 75 65 |%+1.....|...: que|
|00002410| 73 74 69 6f 6e 25 3d 28 | 28 71 75 65 73 74 69 6f |stion%=(|(questio|
|00002420| 6e 25 2b 64 69 72 65 63 | 74 69 6f 6e 25 2b 6e 68 |n%+direc|tion%+nh|
|00002430| 65 72 65 25 2d 31 29 20 | 83 6e 68 65 72 65 25 29 |ere%-1) |.nhere%)|
|00002440| 2b 31 0d 0e 1a 05 cd 0d | 0e 24 05 e1 0d 0e 2e 04 |+1......|.$......|
|00002450| 0d 0e 38 14 dd f2 63 6c | 6f 73 65 71 75 65 73 74 |..8...cl|osequest|
|00002460| 69 6f 6e 73 0d 0e 42 1b | 21 62 6c 6f 63 6b 25 3d |ions..B.|!block%=|
|00002470| 71 75 65 73 74 69 6f 6e | 68 61 6e 64 6c 65 25 0d |question|handle%.|
|00002480| 0e 4c 20 c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.L .."Wi|mp_Close|
|00002490| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|000024a0| 0e 56 05 e1 0d 0e 60 04 | 0d 0e 6a 10 dd f2 6f 70 |.V....`.|..j...op|
|000024b0| 65 6e 72 65 73 75 6c 74 | 0d 0e 74 14 ea 78 31 25 |enresult|..t..x1%|
|000024c0| 2c 79 31 25 2c 78 32 25 | 2c 79 32 25 0d 0e 7e 22 |,y1%,x2%|,y2%..~"|
|000024d0| f2 73 61 76 65 66 69 6c | 65 28 22 3c 44 44 4c 49 |.savefil|e("<DDLI|
|000024e0| 24 44 69 72 3e 2e 52 65 | 73 75 6c 74 22 29 0d 0e |$Dir>.Re|sult")..|
|000024f0| 88 14 f2 63 61 6c 63 75 | 6c 61 74 65 72 65 73 75 |...calcu|lateresu|
|00002500| 6c 74 0d 0e 92 19 21 62 | 6c 6f 63 6b 25 3d 72 65 |lt....!b|lock%=re|
|00002510| 73 75 6c 74 68 61 6e 64 | 6c 65 25 0d 0e 9c 23 c8 |sulthand|le%...#.|
|00002520| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00002530| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 0e |State",,|block%..|
|00002540| a6 39 78 31 25 3d 62 6c | 6f 63 6b 25 21 34 3a 79 |.9x1%=bl|ock%!4:y|
|00002550| 31 25 3d 62 6c 6f 63 6b | 25 21 38 3a 78 32 25 3d |1%=block|%!8:x2%=|
|00002560| 62 6c 6f 63 6b 25 21 31 | 32 3a 79 32 25 3d 62 6c |block%!1|2:y2%=bl|
|00002570| 6f 63 6b 25 21 31 36 0d | 0e b0 2b c8 99 22 57 69 |ock%!16.|..+.."Wi|
|00002580| 6d 70 5f 46 6f 72 63 65 | 52 65 64 72 61 77 22 2c |mp_Force|Redraw",|
|00002590| 2d 31 2c 78 31 25 2c 79 | 31 25 2c 78 32 25 2c 79 |-1,x1%,y|1%,x2%,y|
|000025a0| 32 25 0d 0e ba 0f 62 6c | 6f 63 6b 25 21 32 34 3d |2%....bl|ock%!24=|
|000025b0| 30 0d 0e c4 1f c8 99 22 | 57 69 6d 70 5f 4f 70 65 |0......"|Wimp_Ope|
|000025c0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|000025d0| 0d 0e ce 05 e1 0d 0e d8 | 04 0d 0e e2 15 dd f2 63 |........|.......c|
|000025e0| 61 6c 63 75 6c 61 74 65 | 72 65 73 75 6c 74 0d 0e |alculate|result..|
|000025f0| ec 15 ea 69 25 2c 71 73 | 74 25 2c 61 25 2c 74 25 |...i%,qs|t%,a%,t%|
|00002600| 2c 69 24 0d 0e f6 0d 66 | 75 6e 63 25 28 29 3d 30 |,i$....f|unc%()=0|
|00002610| 0d 0f 00 11 e3 69 25 3d | 31 20 b8 6e 68 65 72 65 |.....i%=|1 .nhere|
|00002620| 25 0d 0f 0a 12 20 71 73 | 74 25 3d 61 73 6b 25 28 |%.... qs|t%=ask%(|
|00002630| 69 25 29 0d 0f 14 13 20 | 61 25 3d 61 6e 73 77 65 |i%).... |a%=answe|
|00002640| 72 25 28 69 25 29 0d 0f | 1e 0d 20 e7 61 25 3c 3e |r%(i%)..|.. .a%<>|
|00002650| 30 20 8c 0d 0f 28 2d 20 | 20 e7 61 25 2a 6d 69 78 |0 ...(- | .a%*mix|
|00002660| 25 28 69 25 29 3e 30 20 | 74 25 3d 62 25 28 71 73 |%(i%)>0 |t%=b%(qs|
|00002670| 74 25 29 20 8b 74 25 3d | 61 25 28 71 73 74 25 29 |t%) .t%=|a%(qst%)|
|00002680| 0d 0f 32 37 20 20 66 75 | 6e 63 25 28 74 25 29 2b |..27 fu|nc%(t%)+|
|00002690| 3d 94 61 25 3a f4 20 74 | 68 65 20 73 63 6f 72 65 |=.a%:. t|he score|
|000026a0| 20 66 6f 72 20 66 75 6e | 63 74 69 6f 6e 20 6e 75 | for fun|ction nu|
|000026b0| 6d 62 65 72 20 74 25 0d | 0f 3c 06 20 cd 0d 0f 46 |mber t%.|.<. ...F|
|000026c0| 05 ed 0d 0f 50 4b 72 65 | 73 75 6c 74 24 3d a4 70 |....PKre|sult$=.p|
|000026d0| 72 66 28 22 45 58 49 22 | 2c 31 2c 32 29 2b a4 70 |rf("EXI"|,1,2)+.p|
|000026e0| 72 66 28 22 53 58 4e 22 | 2c 33 2c 34 29 2b a4 70 |rf("SXN"|,3,4)+.p|
|000026f0| 72 66 28 22 54 58 46 22 | 2c 35 2c 36 29 2b a4 70 |rf("TXF"|,5,6)+.p|
|00002700| 72 66 28 22 4a 58 50 22 | 2c 37 2c 38 29 0d 0f 5a |rf("JXP"|,7,8)..Z|
|00002710| 1a 24 72 69 63 6f 6e 25 | 28 30 29 3d 72 65 73 75 |.$ricon%|(0)=resu|
|00002720| 6c 74 24 2b bd 31 33 0d | 0f 64 24 24 72 69 63 6f |lt$+.13.|.d$$rico|
|00002730| 6e 25 28 31 29 3d a4 62 | 61 72 28 22 45 22 2c 22 |n%(1)=.b|ar("E","|
|00002740| 49 22 2c 31 2c 32 29 2b | bd 31 33 0d 0f 6e 24 24 |I",1,2)+|.13..n$$|
|00002750| 72 69 63 6f 6e 25 28 32 | 29 3d a4 62 61 72 28 22 |ricon%(2|)=.bar("|
|00002760| 53 22 2c 22 4e 22 2c 33 | 2c 34 29 2b bd 31 33 0d |S","N",3|,4)+.13.|
|00002770| 0f 78 24 24 72 69 63 6f | 6e 25 28 33 29 3d a4 62 |.x$$rico|n%(3)=.b|
|00002780| 61 72 28 22 54 22 2c 22 | 46 22 2c 35 2c 36 29 2b |ar("T","|F",5,6)+|
|00002790| bd 31 33 0d 0f 82 24 24 | 72 69 63 6f 6e 25 28 34 |.13...$$|ricon%(4|
|000027a0| 29 3d a4 62 61 72 28 22 | 4a 22 2c 22 50 22 2c 37 |)=.bar("|J","P",7|
|000027b0| 2c 38 29 2b bd 31 33 0d | 0f 8c 18 f2 72 65 73 75 |,8)+.13.|....resu|
|000027c0| 6c 74 63 6f 6c 6f 75 72 | 28 35 2c 31 2c 32 29 0d |ltcolour|(5,1,2).|
|000027d0| 0f 96 18 f2 72 65 73 75 | 6c 74 63 6f 6c 6f 75 72 |....resu|ltcolour|
|000027e0| 28 37 2c 33 2c 34 29 0d | 0f a0 18 f2 72 65 73 75 |(7,3,4).|....resu|
|000027f0| 6c 74 63 6f 6c 6f 75 72 | 28 39 2c 35 2c 36 29 0d |ltcolour|(9,5,6).|
|00002800| 0f aa 19 f2 72 65 73 75 | 6c 74 63 6f 6c 6f 75 72 |....resu|ltcolour|
|00002810| 28 31 31 2c 37 2c 38 29 | 0d 0f b4 0d f2 64 6f 6d |(11,7,8)|.....dom|
|00002820| 69 6e 61 6e 74 0d 0f be | 17 f2 63 6f 6d 70 6f 75 |inant...|..compou|
|00002830| 6e 64 28 31 37 2c 31 31 | 2c 31 30 29 0d 0f c8 17 |nd(17,11|,10)....|
|00002840| f2 63 6f 6d 70 6f 75 6e | 64 28 31 38 2c 31 33 2c |.compoun|d(18,13,|
|00002850| 31 32 29 0d 0f d2 15 f2 | 63 6f 6d 70 6f 75 6e 64 |12).....|compound|
|00002860| 28 31 39 2c 39 2c 30 29 | 0d 0f dc 42 63 6f 6d 70 |(19,9,0)|...Bcomp|
|00002870| 31 24 3d a4 70 72 66 28 | 22 45 58 49 22 2c 39 2c |1$=.prf(|"EXI",9,|
|00002880| 30 29 2b a4 70 72 66 28 | 22 53 58 4e 22 2c 31 33 |0)+.prf(|"SXN",13|
|00002890| 2c 31 32 29 2b a4 70 72 | 66 28 22 54 58 46 22 2c |,12)+.pr|f("TXF",|
|000028a0| 31 31 2c 31 30 29 2b 22 | 4a 22 0d 0f e6 42 63 6f |11,10)+"|J"...Bco|
|000028b0| 6d 70 32 24 3d a4 70 72 | 66 28 22 45 58 49 22 2c |mp2$=.pr|f("EXI",|
|000028c0| 30 2c 39 29 2b a4 70 72 | 66 28 22 53 58 4e 22 2c |0,9)+.pr|f("SXN",|
|000028d0| 31 32 2c 31 33 29 2b a4 | 70 72 66 28 22 54 58 46 |12,13)+.|prf("TXF|
|000028e0| 22 2c 31 30 2c 31 31 29 | 2b 22 50 22 0d 0f f0 52 |",10,11)|+"P"...R|
|000028f0| 69 24 3d 24 72 69 63 6f | 6e 25 28 32 30 29 3a c1 |i$=$rico|n%(20):.|
|00002900| 69 24 2c 33 32 2c 34 29 | 3d 63 6f 6d 70 31 24 3a |i$,32,4)|=comp1$:|
|00002910| c1 69 24 2c 33 39 2c 34 | 29 3d 63 6f 6d 70 32 24 |.i$,39,4|)=comp2$|
|00002920| 3a c1 69 24 2c 35 33 2c | 33 29 3d a4 6e 6f 74 3a |:.i$,53,|3)=.not:|
|00002930| 24 72 69 63 6f 6e 25 28 | 32 30 29 3d 69 24 0d 0f |$ricon%(|20)=i$..|
|00002940| fa 33 69 24 3d 24 72 69 | 63 6f 6e 25 28 32 31 29 |.3i$=$ri|con%(21)|
|00002950| 3a c1 69 24 2c 33 34 2c | 34 29 3d 72 65 73 75 6c |:.i$,34,|4)=resul|
|00002960| 74 24 3a 24 72 69 63 6f | 6e 25 28 32 31 29 3d 69 |t$:$rico|n%(21)=i|
|00002970| 24 0d 10 04 05 e1 0d 10 | 0e 04 0d 10 18 15 dd a4 |$.......|........|
|00002980| 70 72 66 28 72 24 2c 72 | 31 25 2c 72 32 25 29 0d |prf(r$,r|1%,r2%).|
|00002990| 10 22 26 3d c1 72 24 2c | 32 2d b4 28 66 75 6e 63 |."&=.r$,|2-.(func|
|000029a0| 25 28 72 31 25 29 2d 66 | 75 6e 63 25 28 72 32 25 |%(r1%)-f|unc%(r2%|
|000029b0| 29 29 2c 31 29 0d 10 2c | 04 0d 10 36 18 dd a4 62 |)),1)..,|...6...b|
|000029c0| 61 72 28 61 24 2c 62 24 | 2c 72 31 25 2c 72 32 25 |ar(a$,b$|,r1%,r2%|
|000029d0| 29 0d 10 40 0c ea 69 24 | 2c 74 6f 74 25 0d 10 4a |)..@..i$|,tot%..J|
|000029e0| 15 69 24 3d 61 24 2b c4 | 35 35 2c 22 20 22 29 2b |.i$=a$+.|55," ")+|
|000029f0| 62 24 0d 10 54 1e 74 6f | 74 25 3d 66 75 6e 63 25 |b$..T.to|t%=func%|
|00002a00| 28 72 31 25 29 2b 66 75 | 6e 63 25 28 72 32 25 29 |(r1%)+fu|nc%(r2%)|
|00002a10| 0d 10 5e 29 e7 74 6f 74 | 25 20 c1 69 24 2c 39 2b |..^).tot|% .i$,9+|
|00002a20| 34 30 2a 66 75 6e 63 25 | 28 72 32 25 29 2f 74 6f |40*func%|(r2%)/to|
|00002a30| 74 25 2c 31 29 3d 22 2a | 22 0d 10 68 26 c1 69 24 |t%,1)="*|"..h&.i$|
|00002a40| 2c 33 2c 35 29 3d c0 22 | 28 22 2b c3 66 75 6e 63 |,3,5)=."|("+.func|
|00002a50| 25 28 72 31 25 29 2b 22 | 29 20 20 22 2c 35 29 0d |%(r1%)+"|) ",5).|
|00002a60| 10 72 27 c1 69 24 2c 35 | 31 2c 35 29 3d c2 22 20 |.r'.i$,5|1,5)=." |
|00002a70| 20 28 22 2b c3 66 75 6e | 63 25 28 72 32 25 29 2b | ("+.fun|c%(r2%)+|
|00002a80| 22 29 22 2c 35 29 0d 10 | 7c 07 3d 69 24 0d 10 86 |")",5)..||.=i$...|
|00002a90| 04 0d 10 90 1e dd f2 72 | 65 73 75 6c 74 63 6f 6c |.......r|esultcol|
|00002aa0| 6f 75 72 28 69 25 2c 72 | 31 25 2c 72 32 25 29 0d |our(i%,r|1%,r2%).|
|00002ab0| 10 9a 19 21 62 6c 6f 63 | 6b 25 3d 72 65 73 75 6c |...!bloc|k%=resul|
|00002ac0| 74 68 61 6e 64 6c 65 25 | 0d 10 a4 17 62 6c 6f 63 |thandle%|....bloc|
|00002ad0| 6b 25 21 31 32 3d 26 30 | 46 30 30 30 30 30 30 0d |k%!12=&0|F000000.|
|00002ae0| 10 ae 0f 62 6c 6f 63 6b | 25 21 34 3d 69 25 0d 10 |...block|%!4=i%..|
|00002af0| b8 41 e7 66 75 6e 63 25 | 28 72 31 25 29 3e 66 75 |.A.func%|(r1%)>fu|
|00002b00| 6e 63 25 28 72 32 25 29 | 20 62 6c 6f 63 6b 25 21 |nc%(r2%)| block%!|
|00002b10| 38 3d 26 30 38 30 30 30 | 30 30 30 20 8b 62 6c 6f |8=&08000|000 .blo|
|00002b20| 63 6b 25 21 38 3d 26 30 | 37 30 30 30 30 30 30 0d |ck%!8=&0|7000000.|
|00002b30| 10 c2 21 c8 99 22 57 69 | 6d 70 5f 53 65 74 49 63 |..!.."Wi|mp_SetIc|
|00002b40| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00002b50| 0d 10 cc 11 62 6c 6f 63 | 6b 25 21 34 3d 69 25 2b |....bloc|k%!4=i%+|
|00002b60| 31 0d 10 d6 41 e7 66 75 | 6e 63 25 28 72 32 25 29 |1...A.fu|nc%(r2%)|
|00002b70| 3e 66 75 6e 63 25 28 72 | 31 25 29 20 62 6c 6f 63 |>func%(r|1%) bloc|
|00002b80| 6b 25 21 38 3d 26 30 38 | 30 30 30 30 30 30 20 8b |k%!8=&08|000000 .|
|00002b90| 62 6c 6f 63 6b 25 21 38 | 3d 26 30 37 30 30 30 30 |block%!8|=&070000|
|00002ba0| 30 30 0d 10 e0 21 c8 99 | 22 57 69 6d 70 5f 53 65 |00...!..|"Wimp_Se|
|00002bb0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00002bc0| 63 6b 25 0d 10 ea 05 e1 | 0d 10 f4 04 0d 10 fe 0e |ck%.....|........|
|00002bd0| dd f2 64 6f 6d 69 6e 61 | 6e 74 0d 11 08 0a ea 69 |..domina|nt.....i|
|00002be0| 25 2c 6a 24 0d 11 12 1b | 24 72 69 63 6f 6e 25 28 |%,j$....|$ricon%(|
|00002bf0| 32 32 29 3d 72 65 73 75 | 6c 74 24 2b bd 31 33 0d |22)=resu|lt$+.13.|
|00002c00| 11 1c 14 e7 a7 72 65 73 | 75 6c 74 24 2c 22 58 22 |.....res|ult$,"X"|
|00002c10| 29 20 8c 0d 11 26 51 20 | 24 72 69 63 6f 6e 25 28 |) ...&Q |$ricon%(|
|00002c20| 31 33 29 3d 22 59 6f 75 | 72 20 73 63 6f 72 65 73 |13)="You|r scores|
|00002c30| 20 77 65 72 65 20 62 6f | 72 64 65 72 6c 69 6e 65 | were bo|rderline|
|00002c40| 20 6f 6e 20 74 68 65 20 | 70 72 65 66 65 72 65 6e | on the |preferen|
|00002c50| 63 65 73 20 72 65 70 72 | 65 73 65 6e 74 65 64 22 |ces repr|esented"|
|00002c60| 2b bd 31 33 0d 11 30 4d | 20 24 72 69 63 6f 6e 25 |+.13..0M| $ricon%|
|00002c70| 28 31 34 29 3d 22 62 79 | 20 74 68 65 20 6c 65 74 |(14)="by| the let|
|00002c80| 74 65 72 20 58 2e 20 53 | 6f 20 74 68 65 72 65 20 |ter X. S|o there |
|00002c90| 69 73 20 6e 6f 74 20 65 | 6e 6f 75 67 68 20 69 6e |is not e|nough in|
|00002ca0| 66 6f 72 6d 61 74 69 6f | 6e 20 74 6f 22 2b bd 31 |formatio|n to"+.1|
|00002cb0| 33 0d 11 3a 4b 20 24 72 | 69 63 6f 6e 25 28 31 35 |3..:K $r|icon%(15|
|00002cc0| 29 3d 22 63 61 6c 63 75 | 6c 61 74 65 20 77 68 61 |)="calcu|late wha|
|00002cd0| 74 20 74 68 65 20 64 6f | 6d 69 6e 61 6e 74 2c 20 |t the do|minant, |
|00002ce0| 61 75 78 69 6c 69 61 72 | 79 2c 20 74 65 72 74 69 |auxiliar|y, terti|
|00002cf0| 61 72 79 20 61 6e 64 22 | 2b bd 31 33 0d 11 44 4f |ary and"|+.13..DO|
|00002d00| 20 24 72 69 63 6f 6e 25 | 28 31 36 29 3d 22 69 6e | $ricon%|(16)="in|
|00002d10| 66 65 72 69 6f 72 20 66 | 75 6e 63 74 69 6f 6e 73 |ferior f|unctions|
|00002d20| 20 73 68 6f 75 6c 64 20 | 62 65 20 66 6f 72 20 74 | should |be for t|
|00002d30| 68 65 20 74 79 70 65 20 | 79 6f 75 20 73 63 6f 72 |he type |you scor|
|00002d40| 65 64 20 61 73 2e 22 2b | bd 31 33 0d 11 4e 05 cc |ed as."+|.13..N..|
|00002d50| 0d 11 58 10 20 c8 8e 72 | 65 73 75 6c 74 24 20 ca |..X. ..r|esult$ .|
|00002d60| 0d 11 62 1d 20 c9 22 49 | 4e 54 50 22 2c 22 45 4e |..b. ."I|NTP","EN|
|00002d70| 54 4a 22 3a 69 24 3d 22 | 54 4e 53 46 22 0d 11 6c |TJ":i$="|TNSF"..l|
|00002d80| 1d 20 c9 22 49 53 54 50 | 22 2c 22 45 53 54 4a 22 |. ."ISTP|","ESTJ"|
|00002d90| 3a 69 24 3d 22 54 53 4e | 46 22 0d 11 76 1d 20 c9 |:i$="TSN|F"..v. .|
|00002da0| 22 49 4e 46 50 22 2c 22 | 45 4e 46 4a 22 3a 69 24 |"INFP","|ENFJ":i$|
|00002db0| 3d 22 46 4e 53 54 22 0d | 11 80 1d 20 c9 22 49 53 |="FNST".|... ."IS|
|00002dc0| 46 50 22 2c 22 45 53 46 | 4a 22 3a 69 24 3d 22 46 |FP","ESF|J":i$="F|
|00002dd0| 53 4e 54 22 0d 11 8a 1d | 20 c9 22 49 4e 54 4a 22 |SNT"....| ."INTJ"|
|00002de0| 2c 22 45 4e 54 50 22 3a | 69 24 3d 22 4e 54 46 53 |,"ENTP":|i$="NTFS|
|00002df0| 22 0d 11 94 1d 20 c9 22 | 49 4e 46 4a 22 2c 22 45 |".... ."|INFJ","E|
|00002e00| 4e 46 50 22 3a 69 24 3d | 22 4e 46 54 53 22 0d 11 |NFP":i$=|"NFTS"..|
|00002e10| 9e 1d 20 c9 22 49 53 54 | 4a 22 2c 22 45 53 54 50 |.. ."IST|J","ESTP|
|00002e20| 22 3a 69 24 3d 22 53 54 | 46 4e 22 0d 11 a8 1d 20 |":i$="ST|FN".... |
|00002e30| c9 22 49 53 46 4a 22 2c | 22 45 53 46 50 22 3a 69 |."ISFJ",|"ESFP":i|
|00002e40| 24 3d 22 53 46 54 4e 22 | 0d 11 b2 30 20 7f 3a 85 |$="SFTN"|...0 .:.|
|00002e50| 32 35 35 2c 22 50 52 4f | 43 64 6f 6d 69 6e 61 6e |255,"PRO|Cdominan|
|00002e60| 74 3a 20 63 61 6e 27 74 | 20 66 69 6e 64 20 74 68 |t: can't| find th|
|00002e70| 61 74 20 74 79 70 65 22 | 0d 11 bc 06 20 cb 0d 11 |at type"|.... ...|
|00002e80| c6 08 20 f7 2b 30 0d 11 | d0 2b 20 dc 20 44 4f 4d |.. .+0..|.+ . DOM|
|00002e90| 49 4e 41 4e 54 2c 41 55 | 58 49 4c 49 41 52 59 2c |INANT,AU|XILIARY,|
|00002ea0| 54 45 52 54 49 41 52 59 | 2c 49 4e 46 45 52 49 4f |TERTIARY|,INFERIO|
|00002eb0| 52 0d 11 da 0d 20 e3 69 | 25 3d 31 20 b8 34 0d 11 |R.... .i|%=1 .4..|
|00002ec0| e4 09 20 20 f3 6a 24 0d | 11 ee a0 20 20 6a 24 3d |.. .j$.|... j$=|
|00002ed0| 22 59 6f 75 72 20 22 2b | 6a 24 2b 22 20 66 75 6e |"Your "+|j$+" fun|
|00002ee0| 63 74 69 6f 6e 20 69 73 | 20 22 2b c1 22 49 6e 74 |ction is| "+."Int|
|00002ef0| 72 6f 45 78 74 72 61 22 | 2c 31 2d 35 2a 28 c0 72 |roExtra"|,1-5*(.r|
|00002f00| 65 73 75 6c 74 24 2c 31 | 29 3d 22 45 22 20 82 28 |esult$,1|)="E" .(|
|00002f10| 69 25 20 83 32 20 3d 30 | 29 29 2c 35 29 2b 22 76 |i% .2 =0|)),5)+"v|
|00002f20| 65 72 74 65 64 20 22 2b | c1 22 53 65 6e 73 69 6e |erted "+|."Sensin|
|00002f30| 67 20 20 49 6e 74 75 69 | 74 69 6f 6e 54 68 69 6e |g Intui|tionThin|
|00002f40| 6b 69 6e 67 20 46 65 65 | 6c 69 6e 67 22 2c 39 2a |king Fee|ling",9*|
|00002f50| a7 22 53 4e 54 46 22 2c | c1 69 24 2c 69 25 2c 31 |."SNTF",|.i$,i%,1|
|00002f60| 29 29 2d 38 2c 39 29 0d | 11 f8 1b 20 20 24 72 69 |))-8,9).|... $ri|
|00002f70| 63 6f 6e 25 28 31 32 2b | 69 25 29 3d 6a 24 2b bd |con%(12+|i%)=j$+.|
|00002f80| 31 33 0d 12 02 06 20 ed | 0d 12 0c 05 cd 0d 12 16 |13.... .|........|
|00002f90| 05 e1 0d 12 20 04 0d 12 | 2a 18 dd f2 63 6f 6d 70 |.... ...|*...comp|
|00002fa0| 6f 75 6e 64 28 69 25 2c | 61 25 2c 62 25 29 0d 12 |ound(i%,|a%,b%)..|
|00002fb0| 34 07 ea 69 24 0d 12 3e | 12 69 24 3d 24 72 69 63 |4..i$..>|.i$=$ric|
|00002fc0| 6f 6e 25 28 69 25 29 0d | 12 48 3f c1 69 24 2c 32 |on%(i%).|.H?.i$,2|
|00002fd0| 35 2c 39 29 3d c0 22 28 | 22 2b c3 66 75 6e 63 25 |5,9)=."(|"+.func%|
|00002fe0| 28 61 25 29 2b 22 29 20 | 20 22 2c 35 29 2b c2 22 |(a%)+") | ",5)+."|
|00002ff0| 20 20 28 22 2b c3 66 75 | 6e 63 25 28 62 25 29 2b | ("+.fu|nc%(b%)+|
|00003000| 22 29 22 2c 34 29 0d 12 | 52 12 24 72 69 63 6f 6e |")",4)..|R.$ricon|
|00003010| 25 28 69 25 29 3d 69 24 | 0d 12 5c 05 e1 0d 12 66 |%(i%)=i$|..\....f|
|00003020| 04 0d 12 70 09 dd a4 6e | 6f 74 0d 12 7a 18 ea 66 |...p...n|ot..z..f|
|00003030| 61 69 6c 31 25 2c 66 61 | 69 6c 32 25 2c 69 25 2c |ail1%,fa|il2%,i%,|
|00003040| 69 24 0d 12 84 15 66 61 | 69 6c 31 25 3d a3 3a 66 |i$....fa|il1%=.:f|
|00003050| 61 69 6c 32 25 3d a3 0d | 12 8e 0c e3 69 25 3d 31 |ail2%=..|....i%=1|
|00003060| 20 b8 34 0d 12 98 16 20 | 69 24 3d c1 72 65 73 75 | .4.... |i$=.resu|
|00003070| 6c 74 24 2c 69 25 2c 31 | 29 0d 12 a2 0f 20 e7 69 |lt$,i%,1|).... .i|
|00003080| 24 3c 3e 22 58 22 20 8c | 0d 12 ac 21 20 20 e7 69 |$<>"X" .|...! .i|
|00003090| 24 3c 3e c1 63 6f 6d 70 | 31 24 2c 69 25 2c 31 29 |$<>.comp|1$,i%,1)|
|000030a0| 20 66 61 69 6c 31 25 3d | b9 0d 12 b6 21 20 20 e7 | fail1%=|....! .|
|000030b0| 69 24 3c 3e c1 63 6f 6d | 70 32 24 2c 69 25 2c 31 |i$<>.com|p2$,i%,1|
|000030c0| 29 20 66 61 69 6c 32 25 | 3d b9 0d 12 c0 06 20 cd |) fail2%|=..... .|
|000030d0| 0d 12 ca 05 ed 0d 12 d4 | 1c e7 66 61 69 6c 31 25 |........|..fail1%|
|000030e0| 20 80 66 61 69 6c 32 25 | 20 8c 20 3d 22 6e 6f 74 | .fail2%| . ="not|
|000030f0| 22 0d 12 de 0a 3d 22 20 | 20 20 22 0d 12 e8 04 0d |"....=" | ".....|
|00003100| 12 f2 0e dd a4 66 69 6c | 65 6e 61 6d 65 0d 12 fc |.....fil|ename...|
|00003110| 22 21 62 6c 6f 63 6b 25 | 3d 73 61 76 65 68 61 6e |"!block%|=savehan|
|00003120| 64 6c 65 25 3a 62 6c 6f | 63 6b 25 21 34 3d 31 0d |dle%:blo|ck%!4=1.|
|00003130| 13 06 21 c8 99 22 57 69 | 6d 70 5f 47 65 74 49 63 |..!.."Wi|mp_GetIc|
|00003140| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00003150| 0d 13 10 11 3d 24 28 62 | 6c 6f 63 6b 25 21 32 38 |....=$(b|lock%!28|
|00003160| 29 0d 13 1a 04 0d 13 24 | 14 dd a4 7a 65 72 6f 73 |)......$|...zeros|
|00003170| 74 72 69 6e 67 28 6d 25 | 29 0d 13 2e 0d ea 69 24 |tring(m%|).....i$|
|00003180| 2c 69 25 2c 6c 25 0d 13 | 38 16 69 24 3d 22 22 3a |,i%,l%..|8.i$="":|
|00003190| 6c 25 3d 6d 25 3a 69 25 | 3d 3f 6c 25 0d 13 42 22 |l%=m%:i%|=?l%..B"|
|000031a0| c8 95 69 25 3c 3e 30 3a | 69 24 2b 3d bd 69 25 3a |..i%<>0:|i$+=.i%:|
|000031b0| 6c 25 2b 3d 31 3a 69 25 | 3d 3f 6c 25 3a ce 0d 13 |l%+=1:i%|=?l%:...|
|000031c0| 4c 07 3d 69 24 0d 13 56 | 04 0d 13 60 15 dd f2 6f |L.=i$..V|...`...o|
|000031d0| 70 65 6e 76 69 65 77 28 | 74 79 70 65 24 29 0d 13 |penview(|type$)..|
|000031e0| 6a 0b e7 76 63 68 25 20 | 8c 0d 13 74 12 20 d9 23 |j..vch% |...t. .#|
|000031f0| 76 63 68 25 3a 76 63 68 | 25 3d 30 0d 13 7e 18 20 |vch%:vch|%=0..~. |
|00003200| 21 62 6c 6f 63 6b 25 3d | 76 69 65 77 68 61 6e 64 |!block%=|viewhand|
|00003210| 6c 65 25 0d 13 88 21 20 | c8 99 22 57 69 6d 70 5f |le%...! |.."Wimp_|
|00003220| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00003230| 6f 63 6b 25 0d 13 92 05 | cd 0d 13 9c 14 76 70 74 |ock%....|.....vpt|
|00003240| 72 25 3d 30 3a 76 6c 69 | 6e 65 25 3d 30 0d 13 a6 |r%=0:vli|ne%=0...|
|00003250| 23 e7 74 79 70 65 24 3d | 22 22 20 e1 3a f4 20 63 |#.type$=|"" .:. c|
|00003260| 6c 6f 73 65 20 61 6e 64 | 20 67 65 74 20 6f 75 74 |lose and| get out|
|00003270| 0d 13 b0 24 76 63 68 25 | 3d 8e 28 22 3c 44 44 4c |...$vch%|=.("<DDL|
|00003280| 49 24 44 69 72 3e 2e 44 | 6f 63 73 2e 22 2b 74 79 |I$Dir>.D|ocs."+ty|
|00003290| 70 65 24 29 0d 13 ba 11 | 76 69 65 77 79 25 3d a4 |pe$)....|viewy%=.|
|000032a0| 6c 69 6e 65 73 0d 13 c4 | 40 21 62 6c 6f 63 6b 25 |lines...|@!block%|
|000032b0| 3d 30 3a 62 6c 6f 63 6b | 25 21 34 3d 2d 38 2d 33 |=0:block|%!4=-8-3|
|000032c0| 32 2a 76 69 65 77 79 25 | 3a 62 6c 6f 63 6b 25 21 |2*viewy%|:block%!|
|000032d0| 38 3d 38 2b 31 36 2a 38 | 30 3a 62 6c 6f 63 6b 25 |8=8+16*8|0:block%|
|000032e0| 21 31 32 3d 30 0d 13 ce | 29 c8 99 22 57 69 6d 70 |!12=0...|).."Wimp|
|000032f0| 5f 53 65 74 45 78 74 65 | 6e 74 22 2c 76 69 65 77 |_SetExte|nt",view|
|00003300| 68 61 6e 64 6c 65 25 2c | 62 6c 6f 63 6b 25 0d 13 |handle%,|block%..|
|00003310| d8 17 21 62 6c 6f 63 6b | 25 3d 76 69 65 77 68 61 |..!block|%=viewha|
|00003320| 6e 64 6c 65 25 0d 13 e2 | 22 c8 99 22 57 69 6d 70 |ndle%...|".."Wimp|
|00003330| 5f 47 65 74 57 69 6e 64 | 6f 77 49 6e 66 6f 22 2c |_GetWind|owInfo",|
|00003340| 2c 62 6c 6f 63 6b 25 0d | 13 ec 3d e7 c0 74 79 70 |,block%.|..=..typ|
|00003350| 65 24 2c 31 29 3d 22 5e | 22 20 24 28 62 6c 6f 63 |e$,1)="^|" $(bloc|
|00003360| 6b 25 21 37 36 29 3d c1 | 74 79 70 65 24 2c 33 29 |k%!76)=.|type$,3)|
|00003370| 20 8b 24 28 62 6c 6f 63 | 6b 25 21 37 36 29 3d 74 | .$(bloc|k%!76)=t|
|00003380| 79 70 65 24 0d 13 f6 0f | 62 6c 6f 63 6b 25 21 32 |ype$....|block%!2|
|00003390| 34 3d 30 0d 14 00 1f c8 | 99 22 57 69 6d 70 5f 4f |4=0.....|."Wimp_O|
|000033a0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|000033b0| 6b 25 0d 14 0a 05 e1 0d | 14 14 04 0d 14 1e 0b dd |k%......|........|
|000033c0| a4 6c 69 6e 65 73 0d 14 | 28 0e ea 6c 69 6e 65 73 |.lines..|(..lines|
|000033d0| 25 2c 62 24 0d 14 32 0c | 6c 69 6e 65 73 25 3d 30 |%,b$..2.|lines%=0|
|000033e0| 0d 14 3c 21 f5 3a 62 24 | 3d be 23 76 63 68 25 3a |..<!.:b$|=.#vch%:|
|000033f0| 6c 69 6e 65 73 25 2b 3d | 31 3a fd c5 23 76 63 68 |lines%+=|1:..#vch|
|00003400| 25 0d 14 46 0d 3d 6c 69 | 6e 65 73 25 2b 31 0d 14 |%..F.=li|nes%+1..|
|00003410| 50 04 0d 14 5a 12 dd f2 | 66 69 6e 64 76 69 65 77 |P...Z...|findview|
|00003420| 6c 69 6e 65 0d 14 64 07 | ea 69 25 0d 14 6e 11 e7 |line..d.|.i%..n..|
|00003430| 79 30 25 3d 76 6c 69 6e | 65 25 20 8c 0d 14 78 11 |y0%=vlin|e% ...x.|
|00003440| 20 cf 23 76 63 68 25 3d | 76 70 74 72 25 0d 14 82 | .#vch%=|vptr%...|
|00003450| 05 cc 0d 14 8c 21 20 e7 | 79 30 25 3c 76 6c 69 6e |.....! .|y0%<vlin|
|00003460| 65 25 20 76 6c 69 6e 65 | 25 3d 30 3a 76 70 74 72 |e% vline|%=0:vptr|
|00003470| 25 3d 30 0d 14 96 11 20 | cf 23 76 63 68 25 3d 76 |%=0.... |.#vch%=v|
|00003480| 70 74 72 25 0d 14 a0 2e | 20 e7 79 30 25 3e 76 6c |ptr%....| .y0%>vl|
|00003490| 69 6e 65 25 20 e3 69 25 | 3d 76 6c 69 6e 65 25 20 |ine% .i%|=vline% |
|000034a0| b8 79 30 25 2d 31 3a 69 | 24 3d be 23 76 63 68 25 |.y0%-1:i|$=.#vch%|
|000034b0| 3a ed 0d 14 aa 1c 20 76 | 70 74 72 25 3d 8f 23 76 |:..... v|ptr%=.#v|
|000034c0| 63 68 25 3a 76 6c 69 6e | 65 25 3d 79 30 25 0d 14 |ch%:vlin|e%=y0%..|
|000034d0| b4 05 cd 0d 14 be 28 20 | e7 79 31 25 3e 79 30 25 |......( |.y1%>y0%|
|000034e0| 20 e3 69 25 3d 79 30 25 | 20 b8 79 31 25 2d 31 3a | .i%=y0%| .y1%-1:|
|000034f0| 69 24 3d be 23 76 63 68 | 25 3a ed 0d 14 c8 05 e1 |i$=.#vch|%:......|
|00003500| 0d 14 d2 04 0d 14 dc 0f | dd f2 6f 70 65 6e 69 6e |........|..openin|
|00003510| 74 72 6f 0d 14 e6 18 21 | 62 6c 6f 63 6b 25 3d 69 |tro....!|block%=i|
|00003520| 6e 74 72 6f 68 61 6e 64 | 6c 65 25 0d 14 f0 23 c8 |ntrohand|le%...#.|
|00003530| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00003540| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 14 |State",,|block%..|
|00003550| fa 1f c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |...."Wim|p_OpenWi|
|00003560| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 15 04 |ndow",,b|lock%...|
|00003570| 0e 62 6c 6f 63 6b 25 21 | 34 3d 31 0d 15 0e 21 c8 |.block%!|4=1...!.|
|00003580| 99 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 |."Wimp_G|etIconSt|
|00003590| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 15 18 18 |ate",,bl|ock%....|
|000035a0| 69 6e 74 72 6f 69 63 6f | 6e 25 3d 62 6c 6f 63 6b |introico|n%=block|
|000035b0| 25 21 32 38 0d 15 22 13 | 24 69 6e 74 72 6f 69 63 |%!28..".|$introic|
|000035c0| 6f 6e 25 3d bd 31 33 0d | 15 2c 38 c8 99 22 57 69 |on%=.13.|.,8.."Wi|
|000035d0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000035e0| 69 6f 6e 22 2c 69 6e 74 | 72 6f 68 61 6e 64 6c 65 |ion",int|rohandle|
|000035f0| 25 2c 31 2c 2d 31 2c 2d | 31 2c 2d 31 2c 2d 31 0d |%,1,-1,-|1,-1,-1.|
|00003600| 15 36 05 e1 0d 15 40 04 | 0d 15 4a 0a dd f2 69 6e |.6....@.|..J...in|
|00003610| 69 74 0d 15 54 d1 77 69 | 6d 70 25 3d a3 3a 63 68 |it..T.wi|mp%=.:ch|
|00003620| 25 3d 30 3a 74 61 73 6b | 24 3d 22 57 69 6d 70 44 |%=0:task|$="WimpD|
|00003630| 44 4c 49 22 3a 77 6f 72 | 6b 73 70 61 63 65 73 69 |DLI":wor|kspacesi|
|00003640| 7a 65 25 3d 36 31 34 34 | 3a 71 75 69 74 25 3d a3 |ze%=6144|:quit%=.|
|00003650| 3a 6d 65 6e 75 24 3d 22 | 22 3a 73 65 6c 65 63 74 |:menu$="|":select|
|00003660| 69 63 6f 6e 25 3d 30 3a | 73 61 76 65 69 63 6f 6e |icon%=0:|saveicon|
|00003670| 24 3d 22 66 69 6c 65 5f | 30 38 35 22 3a 73 61 76 |$="file_|085":sav|
|00003680| 65 6e 61 6d 65 24 3d 22 | 44 44 4c 49 46 69 6c 65 |ename$="|DDLIFile|
|00003690| 22 3a 6f 6c 64 74 79 70 | 65 24 3d 22 22 3a 76 63 |":oldtyp|e$="":vc|
|000036a0| 68 25 3d 30 3a 76 70 74 | 72 25 3d 30 3a 76 6c 69 |h%=0:vpt|r%=0:vli|
|000036b0| 6e 65 25 3d 30 3a 72 65 | 73 75 6c 74 24 3d 22 58 |ne%=0:re|sult$="X|
|000036c0| 58 58 58 22 3a 63 68 32 | 25 3d 30 3a 68 65 61 64 |XXX":ch2|%=0:head|
|000036d0| 24 3d 22 44 44 4c 49 2e | 51 53 54 20 56 20 32 2e |$="DDLI.|QST V 2.|
|000036e0| 30 30 22 0d 15 5e 48 de | 62 6c 6f 63 6b 25 20 36 |00"..^H.|block% 6|
|000036f0| 31 34 34 2c 20 72 65 70 | 6f 72 74 62 6c 6f 63 6b |144, rep|ortblock|
|00003700| 25 20 31 32 38 2c 20 74 | 65 6d 70 25 20 36 34 2c |% 128, t|emp% 64,|
|00003710| 20 77 6f 72 6b 73 70 61 | 63 65 30 25 20 77 6f 72 | workspa|ce0% wor|
|00003720| 6b 73 70 61 63 65 73 69 | 7a 65 25 0d 15 68 21 f2 |kspacesi|ze%..h!.|
|00003730| 63 6f 75 6e 74 71 75 65 | 73 74 69 6f 6e 73 28 6e |countque|stions(n|
|00003740| 68 65 72 65 25 2c 6e 71 | 73 74 25 29 0d 15 72 36 |here%,nq|st%)..r6|
|00003750| de 71 24 28 6e 71 73 74 | 25 29 2c 61 24 28 6e 71 |.q$(nqst|%),a$(nq|
|00003760| 73 74 25 29 2c 62 24 28 | 6e 71 73 74 25 29 2c 61 |st%),b$(|nqst%),a|
|00003770| 25 28 6e 71 73 74 25 29 | 2c 62 25 28 6e 71 73 74 |%(nqst%)|,b%(nqst|
|00003780| 25 29 0d 15 7c 88 de 61 | 73 6b 25 28 6e 68 65 72 |%)..|..a|sk%(nher|
|00003790| 65 25 29 2c 6d 69 78 25 | 28 6e 68 65 72 65 25 29 |e%),mix%|(nhere%)|
|000037a0| 2c 61 6e 73 77 65 72 25 | 28 6e 68 65 72 65 25 29 |,answer%|(nhere%)|
|000037b0| 2c 64 6f 6e 65 25 28 6e | 68 65 72 65 25 29 2c 74 |,done%(n|here%),t|
|000037c0| 65 6d 70 5f 61 73 6b 25 | 28 6e 68 65 72 65 25 29 |emp_ask%|(nhere%)|
|000037d0| 2c 74 65 6d 70 5f 6d 69 | 78 25 28 6e 68 65 72 65 |,temp_mi|x%(nhere|
|000037e0| 25 29 2c 74 65 6d 70 5f | 64 6f 6e 65 25 28 6e 68 |%),temp_|done%(nh|
|000037f0| 65 72 65 25 29 2c 74 65 | 6d 70 5f 61 6e 73 77 65 |ere%),te|mp_answe|
|00003800| 72 25 28 6e 68 65 72 65 | 25 29 0d 15 86 2e de 66 |r%(nhere|%).....f|
|00003810| 75 6e 63 25 28 31 33 29 | 2c 71 69 63 6f 6e 25 28 |unc%(13)|,qicon%(|
|00003820| 37 29 2c 72 69 63 6f 6e | 25 28 32 32 29 2c 74 79 |7),ricon|%(22),ty|
|00003830| 70 65 73 24 28 31 36 29 | 0d 15 90 0e f2 66 69 6c |pes$(16)|.....fil|
|00003840| 6c 74 79 70 65 73 0d 15 | 9a 11 f2 67 65 74 71 75 |ltypes..|...getqu|
|00003850| 65 73 74 69 6f 6e 73 0d | 15 a4 33 c8 99 22 57 69 |estions.|..3.."Wi|
|00003860| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|00003870| 30 30 2c 26 34 42 35 33 | 34 31 35 34 2c 74 61 73 |00,&4B53|4154,tas|
|00003880| 6b 24 20 b8 2c 77 69 6d | 70 25 0d 15 ae 0e f2 74 |k$ .,wim|p%.....t|
|00003890| 65 6d 70 6c 61 74 65 73 | 0d 15 b8 10 f2 69 63 6f |emplates|.....ico|
|000038a0| 6e 62 61 72 69 63 6f 6e | 0d 15 c2 10 f2 64 65 66 |nbaricon|.....def|
|000038b0| 69 6e 65 6d 65 6e 75 73 | 0d 15 cc 12 f2 69 6e 69 |inemenus|.....ini|
|000038c0| 74 71 75 65 73 74 69 6f | 6e 73 0d 15 d6 0f f2 69 |tquestio|ns.....i|
|000038d0| 6e 69 74 72 65 73 75 6c | 74 0d 15 e0 0d f2 69 6e |nitresul|t.....in|
|000038e0| 69 74 73 61 76 65 0d 15 | ea 0e f2 6f 70 65 6e 69 |itsave..|...openi|
|000038f0| 6e 74 72 6f 0d 15 f4 05 | e1 0d 15 fe 04 0d 16 08 |ntro....|........|
|00003900| 4e f4 20 20 54 68 65 72 | 65 20 61 72 65 20 61 20 |N. Ther|e are a |
|00003910| 74 6f 74 61 6c 20 6f 66 | 20 6e 68 65 72 65 25 20 |total of| nhere% |
|00003920| 71 75 65 73 74 69 6f 6e | 73 2c 20 6e 75 6d 62 65 |question|s, numbe|
|00003930| 72 65 64 20 69 6e 20 74 | 68 65 20 51 53 54 20 66 |red in t|he QST f|
|00003940| 69 6c 65 20 62 65 74 77 | 65 65 6e 0d 16 12 4d f4 |ile betw|een...M.|
|00003950| 20 20 31 20 61 6e 64 20 | 6e 71 73 74 25 2e 20 4c | 1 and |nqst%. L|
|00003960| 65 74 20 68 65 72 65 25 | 20 62 65 20 74 68 65 20 |et here%| be the |
|00003970| 71 75 65 73 74 69 6f 6e | 20 6e 75 6d 62 65 72 20 |question| number |
|00003980| 61 73 20 73 65 65 6e 20 | 62 79 20 74 68 65 20 75 |as seen |by the u|
|00003990| 73 65 72 2c 20 61 6e 64 | 0d 16 1c 3e f4 20 20 71 |ser, and|...>. q|
|000039a0| 73 74 25 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |st% the |number o|
|000039b0| 66 20 74 68 61 74 20 71 | 75 65 73 74 69 6f 6e 20 |f that q|uestion |
|000039c0| 69 6e 20 74 68 65 20 51 | 53 54 20 66 69 6c 65 2e |in the Q|ST file.|
|000039d0| 20 54 68 65 6e 3a 0d 16 | 26 25 f4 20 20 71 24 28 | Then:..|&%. q$(|
|000039e0| 71 73 74 25 29 20 69 73 | 20 74 68 65 20 71 75 65 |qst%) is| the que|
|000039f0| 73 74 69 6f 6e 20 74 65 | 78 74 2c 0d 16 30 2f f4 |stion te|xt,..0/.|
|00003a00| 20 20 61 24 28 71 73 74 | 25 29 2c 20 62 24 28 71 | a$(qst|%), b$(q|
|00003a10| 73 74 25 29 20 61 72 65 | 20 74 68 65 20 61 6e 73 |st%) are| the ans|
|00003a20| 77 65 72 20 74 65 78 74 | 73 2c 0d 16 3a 3f f4 20 |wer text|s,..:?. |
|00003a30| 20 61 25 28 71 73 74 25 | 29 2c 20 62 25 28 71 73 | a%(qst%|), b%(qs|
|00003a40| 74 25 29 20 61 72 65 20 | 63 6f 64 65 73 20 66 6f |t%) are |codes fo|
|00003a50| 72 20 74 68 65 20 61 6e | 73 77 65 72 73 27 20 66 |r the an|swers' f|
|00003a60| 75 6e 63 74 69 6f 6e 73 | 2c 0d 16 44 1e f4 20 20 |unctions|,..D.. |
|00003a70| 61 73 6b 25 28 71 73 74 | 25 29 20 67 69 76 65 73 |ask%(qst|%) gives|
|00003a80| 20 68 65 72 65 25 2c 0d | 16 4e 4d f4 20 20 6d 69 | here%,.|.NM. mi|
|00003a90| 78 25 28 68 65 72 65 25 | 29 20 69 73 20 2d 31 20 |x%(here%|) is -1 |
|00003aa0| 6f 72 20 2b 31 20 69 66 | 20 74 68 65 20 6f 72 64 |or +1 if| the ord|
|00003ab0| 65 72 20 6f 66 20 74 68 | 65 20 61 6e 73 77 65 72 |er of th|e answer|
|00003ac0| 73 20 69 73 2f 69 73 20 | 6e 6f 74 20 73 77 61 70 |s is/is |not swap|
|00003ad0| 70 65 64 2c 0d 16 58 4c | f4 20 20 61 6e 73 77 65 |ped,..XL|. answe|
|00003ae0| 72 25 28 68 65 72 65 25 | 29 20 69 73 20 74 68 65 |r%(here%|) is the|
|00003af0| 20 75 73 65 72 27 73 20 | 63 68 6f 69 63 65 20 62 | user's |choice b|
|00003b00| 65 74 77 65 65 6e 20 2d | 37 20 61 6e 64 20 37 20 |etween -|7 and 7 |
|00003b10| 28 2b 76 65 20 3d 20 61 | 6e 73 77 65 72 20 62 29 |(+ve = a|nswer b)|
|00003b20| 0d 16 62 4b f4 20 20 20 | 66 72 6f 6d 20 74 68 65 |..bK. |from the|
|00003b30| 20 75 73 65 72 27 73 20 | 70 6f 69 6e 74 20 6f 66 | user's |point of|
|00003b40| 20 76 69 65 77 3b 20 69 | 65 20 69 66 20 6d 69 78 | view; i|e if mix|
|00003b50| 25 3d 2d 31 2c 20 2b 76 | 65 20 3d 20 51 53 54 27 |%=-1, +v|e = QST'|
|00003b60| 73 20 61 6e 73 77 65 72 | 20 61 21 0d 16 6c 3e f4 |s answer| a!..l>.|
|00003b70| 20 20 64 6f 6e 65 25 28 | 68 65 72 65 25 29 20 69 | done%(|here%) i|
|00003b80| 73 20 54 52 55 45 20 69 | 66 20 74 68 65 20 71 75 |s TRUE i|f the qu|
|00003b90| 65 73 74 69 6f 6e 20 68 | 61 73 20 62 65 65 6e 20 |estion h|as been |
|00003ba0| 61 6e 73 77 65 72 65 64 | 2e 0d 16 76 04 0d 16 80 |answered|...v....|
|00003bb0| 43 f4 20 20 71 75 65 73 | 74 69 6f 6e 25 3d 30 20 |C. ques|tion%=0 |
|00003bc0| 69 66 20 77 65 20 68 61 | 76 65 6e 27 74 20 73 74 |if we ha|ven't st|
|00003bd0| 61 72 74 65 64 20 79 65 | 74 2c 20 69 6e 74 72 6f |arted ye|t, intro|
|00003be0| 20 77 69 6e 64 6f 77 20 | 69 73 20 6f 70 65 6e 2c | window |is open,|
|00003bf0| 0d 16 8a 42 f4 20 20 71 | 75 65 73 74 69 6f 6e 25 |...B. q|uestion%|
|00003c00| 20 62 65 74 77 65 65 6e | 20 31 20 61 6e 64 20 6e | between| 1 and n|
|00003c10| 68 65 72 65 25 20 77 68 | 65 6e 20 63 6f 6e 73 69 |here% wh|en consi|
|00003c20| 64 65 72 69 6e 67 20 61 | 20 71 75 65 73 74 69 6f |dering a| questio|
|00003c30| 6e 2c 0d 16 94 38 f4 20 | 20 71 75 65 73 74 69 6f |n,...8. | questio|
|00003c40| 6e 25 3d 6e 68 65 72 65 | 25 2b 31 20 69 66 20 61 |n%=nhere|%+1 if a|
|00003c50| 6c 6c 20 71 75 65 73 74 | 69 6f 6e 73 20 61 72 65 |ll quest|ions are|
|00003c60| 20 61 6e 73 77 65 72 65 | 64 2e 0d 16 9e 04 0d 16 | answere|d.......|
|00003c70| a8 0f dd f2 66 69 6c 6c | 74 79 70 65 73 0d 16 b2 |....fill|types...|
|00003c80| 07 ea 69 25 0d 16 bc 08 | f7 20 2b 30 0d 16 c6 2d |..i%....|. +0...-|
|00003c90| dc 20 45 4e 46 4a 2c 45 | 4e 46 50 2c 45 4e 54 4a |. ENFJ,E|NFP,ENTJ|
|00003ca0| 2c 45 4e 54 50 2c 45 53 | 46 4a 2c 45 53 46 50 2c |,ENTP,ES|FJ,ESFP,|
|00003cb0| 45 53 54 4a 2c 45 53 54 | 50 0d 16 d0 2d dc 20 49 |ESTJ,EST|P...-. I|
|00003cc0| 4e 46 4a 2c 49 4e 46 50 | 2c 49 4e 54 4a 2c 49 4e |NFJ,INFP|,INTJ,IN|
|00003cd0| 54 50 2c 49 53 46 4a 2c | 49 53 46 50 2c 49 53 54 |TP,ISFJ,|ISFP,IST|
|00003ce0| 4a 2c 49 53 54 50 0d 16 | da 1b e3 69 25 3d 31 20 |J,ISTP..|...i%=1 |
|00003cf0| b8 31 36 3a f3 74 79 70 | 65 73 24 28 69 25 29 3a |.16:.typ|es$(i%):|
|00003d00| ed 0d 16 e4 05 e1 0d 16 | ee 04 0d 16 f8 12 dd a4 |........|........|
|00003d10| 64 75 66 66 74 79 70 65 | 28 69 24 29 0d 17 02 10 |dufftype|(i$)....|
|00003d20| ea 69 25 2c 6a 25 2c 6f | 24 2c 6a 24 0d 17 0c 20 |.i%,j%,o|$,j$... |
|00003d30| 69 24 3d c0 69 24 2b 22 | 20 20 20 20 22 2c 34 29 |i$=.i$+"| ",4)|
|00003d40| 3a 6f 24 3d 22 22 3a 6a | 24 3d 69 24 0d 17 16 0c |:o$="":j|$=i$....|
|00003d50| e3 69 25 3d 31 20 b8 34 | 0d 17 20 4c 20 6a 25 3d |.i%=1 .4|.. L j%=|
|00003d60| 97 c1 69 24 2c 69 25 2c | 31 29 3a e7 6a 25 3e 3d |..i$,i%,|1):.j%>=|
|00003d70| 97 22 61 22 20 80 6a 25 | 3c 3d 97 22 7a 22 20 c1 |."a" .j%|<=."z" .|
|00003d80| 69 24 2c 69 25 2c 31 29 | 3d bd 28 6a 25 2d 33 32 |i$,i%,1)|=.(j%-32|
|00003d90| 29 3a c1 6a 24 2c 69 25 | 2c 31 29 3d bd 28 6a 25 |):.j$,i%|,1)=.(j%|
|00003da0| 2d 33 32 29 0d 17 2a 2e | 20 e7 6a 25 3d 97 22 58 |-32)..*.| .j%=."X|
|00003db0| 22 20 84 6a 25 3d 97 22 | 78 22 20 c1 6a 24 2c 69 |" .j%=."|x" .j$,i|
|00003dc0| 25 2c 31 29 3d c1 22 45 | 53 54 50 22 2c 69 25 2c |%,1)=."E|STP",i%,|
|00003dd0| 31 29 0d 17 34 05 ed 0d | 17 3e 0d e3 69 25 3d 31 |1)..4...|.>..i%=1|
|00003de0| 20 b8 31 36 0d 17 48 19 | 20 e7 6a 24 3d 74 79 70 | .16..H.| .j$=typ|
|00003df0| 65 73 24 28 69 25 29 20 | 6f 24 3d 69 24 0d 17 52 |es$(i%) |o$=i$..R|
|00003e00| 05 ed 0d 17 5c 07 3d 6f | 24 0d 17 66 04 0d 17 70 |....\.=o|$..f...p|
|00003e10| 26 dd f2 63 6f 75 6e 74 | 71 75 65 73 74 69 6f 6e |&..count|question|
|00003e20| 73 28 f8 20 6e 68 65 72 | 65 25 2c f8 20 6e 71 73 |s(. nher|e%,. nqs|
|00003e30| 74 25 29 0d 17 7a 0a ea | 69 25 2c 69 24 0d 17 84 |t%)..z..|i%,i$...|
|00003e40| 23 63 68 25 3d 8e 22 3c | 44 44 4c 49 24 44 69 72 |#ch%=."<|DDLI$Dir|
|00003e50| 3e 2e 44 6f 63 73 2e 44 | 44 4c 49 2f 51 53 54 22 |>.Docs.D|DLI/QST"|
|00003e60| 0d 17 8e 14 6e 68 65 72 | 65 25 3d 30 3a 6e 71 73 |....nher|e%=0:nqs|
|00003e70| 74 25 3d 30 0d 17 98 05 | f5 0d 17 a2 11 20 69 24 |t%=0....|..... i$|
|00003e80| 3d a4 66 69 6c 65 6c 69 | 6e 65 0d 17 ac 12 20 e7 |=.fileli|ne.... .|
|00003e90| c0 69 24 2c 31 29 3d 22 | 23 22 20 8c 0d 17 b6 0f |.i$,1)="|#" .....|
|00003ea0| 20 20 6e 68 65 72 65 25 | 2b 3d 31 0d 17 c0 13 20 | nhere%|+=1.... |
|00003eb0| 20 6e 71 73 74 25 3d a0 | c1 69 24 2c 32 29 0d 17 | nqst%=.|.i$,2)..|
|00003ec0| ca 06 20 cd 0d 17 d4 0a | fd c5 23 63 68 25 0d 17 |.. .....|..#ch%..|
|00003ed0| de 0f d9 23 63 68 25 3a | 63 68 25 3d 30 0d 17 e8 |...#ch%:|ch%=0...|
|00003ee0| 05 e1 0d 17 f2 04 0d 17 | fc 0f dd f2 74 65 6d 70 |........|....temp|
|00003ef0| 6c 61 74 65 73 0d 18 06 | 18 ea 77 6f 72 6b 73 70 |lates...|..worksp|
|00003f00| 61 63 65 25 2c 65 6e 64 | 77 6f 72 6b 25 0d 18 10 |ace%,end|work%...|
|00003f10| 1a 77 6f 72 6b 73 70 61 | 63 65 25 3d 77 6f 72 6b |.workspa|ce%=work|
|00003f20| 73 70 61 63 65 30 25 0d | 18 1a 27 65 6e 64 77 6f |space0%.|..'endwo|
|00003f30| 72 6b 25 3d 77 6f 72 6b | 73 70 61 63 65 30 25 2b |rk%=work|space0%+|
|00003f40| 77 6f 72 6b 73 70 61 63 | 65 73 69 7a 65 25 0d 18 |workspac|esize%..|
|00003f50| 24 31 c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 54 65 |$1.."Wim|p_OpenTe|
|00003f60| 6d 70 6c 61 74 65 22 2c | 2c 22 3c 44 44 4c 49 24 |mplate",|,"<DDLI$|
|00003f70| 44 69 72 3e 2e 54 65 6d | 70 6c 61 74 65 73 22 0d |Dir>.Tem|plates".|
|00003f80| 18 2e 24 69 6e 66 6f 68 | 61 6e 64 6c 65 25 3d a4 |..$infoh|andle%=.|
|00003f90| 67 65 74 74 65 6d 70 6c | 61 74 65 28 22 49 6e 66 |gettempl|ate("Inf|
|00003fa0| 6f 22 29 0d 18 38 26 69 | 6e 74 72 6f 68 61 6e 64 |o")..8&i|ntrohand|
|00003fb0| 6c 65 25 3d a4 67 65 74 | 74 65 6d 70 6c 61 74 65 |le%=.get|template|
|00003fc0| 28 22 49 6e 74 72 6f 22 | 29 0d 18 42 2c 71 75 65 |("Intro"|)..B,que|
|00003fd0| 73 74 69 6f 6e 68 61 6e | 64 6c 65 25 3d a4 67 65 |stionhan|dle%=.ge|
|00003fe0| 74 74 65 6d 70 6c 61 74 | 65 28 22 51 75 65 73 74 |ttemplat|e("Quest|
|00003ff0| 69 6f 6e 22 29 0d 18 4c | 29 72 65 73 75 6c 74 68 |ion")..L|)resulth|
|00004000| 61 6e 64 6c 65 25 3d a4 | 67 65 74 74 65 6d 70 6c |andle%=.|gettempl|
|00004010| 61 74 65 28 22 52 65 73 | 75 6c 74 73 22 29 0d 18 |ate("Res|ults")..|
|00004020| 56 24 73 61 76 65 68 61 | 6e 64 6c 65 25 3d a4 67 |V$saveha|ndle%=.g|
|00004030| 65 74 74 65 6d 70 6c 61 | 74 65 28 22 53 61 76 65 |ettempla|te("Save|
|00004040| 22 29 0d 18 60 24 76 69 | 65 77 68 61 6e 64 6c 65 |")..`$vi|ewhandle|
|00004050| 25 3d a4 67 65 74 74 65 | 6d 70 6c 61 74 65 28 22 |%=.gette|mplate("|
|00004060| 56 69 65 77 22 29 0d 18 | 6a 1a c8 99 22 57 69 6d |View")..|j..."Wim|
|00004070| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00004080| 0d 18 74 05 e1 0d 18 7e | 04 0d 18 88 18 dd a4 67 |..t....~|.......g|
|00004090| 65 74 74 65 6d 70 6c 61 | 74 65 28 74 65 6d 70 24 |ettempla|te(temp$|
|000040a0| 29 0d 18 92 10 24 74 65 | 6d 70 25 3d 74 65 6d 70 |)....$te|mp%=temp|
|000040b0| 24 0d 18 9c 4e c8 99 22 | 57 69 6d 70 5f 4c 6f 61 |$...N.."|Wimp_Loa|
|000040c0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 62 6c 6f 63 |dTemplat|e",,bloc|
|000040d0| 6b 25 2c 77 6f 72 6b 73 | 70 61 63 65 25 2c 65 6e |k%,works|pace%,en|
|000040e0| 64 77 6f 72 6b 25 2c 2d | 31 2c 74 65 6d 70 25 2c |dwork%,-|1,temp%,|
|000040f0| 30 20 b8 2c 2c 77 6f 72 | 6b 73 70 61 63 65 25 0d |0 .,,wor|kspace%.|
|00004100| 18 a6 35 e7 74 65 6d 70 | 24 3d 22 53 61 76 65 22 |..5.temp|$="Save"|
|00004110| 20 62 6c 6f 63 6b 25 21 | 31 31 32 3d 31 3a f4 20 | block%!|112=1:. |
|00004120| 73 70 65 63 69 61 6c 20 | 70 6c 65 61 64 69 6e 67 |special |pleading|
|00004130| 20 21 21 21 0d 18 b0 2b | c8 99 22 57 69 6d 70 5f | !!!...+|.."Wimp_|
|00004140| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|00004150| 6c 6f 63 6b 25 20 b8 20 | 68 61 6e 64 6c 65 25 0d |lock% . |handle%.|
|00004160| 18 ba 0c 3d 68 61 6e 64 | 6c 65 25 0d 18 c4 04 0d |...=hand|le%.....|
|00004170| 18 ce 11 dd f2 69 63 6f | 6e 62 61 72 69 63 6f 6e |.....ico|nbaricon|
|00004180| 0d 18 d8 3e 21 62 6c 6f | 63 6b 25 3d 2d 31 3a 62 |...>!blo|ck%=-1:b|
|00004190| 6c 6f 63 6b 25 21 34 3d | 30 3a 62 6c 6f 63 6b 25 |lock%!4=|0:block%|
|000041a0| 21 38 3d 30 3a 62 6c 6f | 63 6b 25 21 31 32 3d 36 |!8=0:blo|ck%!12=6|
|000041b0| 38 3a 62 6c 6f 63 6b 25 | 21 31 36 3d 36 38 0d 18 |8:block%|!16=68..|
|000041c0| e2 2c 62 6c 6f 63 6b 25 | 21 32 30 3d 26 33 30 30 |.,block%|!20=&300|
|000041d0| 32 3a 24 28 62 6c 6f 63 | 6b 25 2b 32 34 29 3d 22 |2:$(bloc|k%+24)="|
|000041e0| 21 77 69 6d 70 64 64 6c | 69 22 0d 18 ec 30 c8 99 |!wimpddl|i"...0..|
|000041f0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00004200| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 69 63 6f 6e |",,block|% . icon|
|00004210| 62 61 72 68 61 6e 64 6c | 65 25 0d 18 f6 05 e1 0d |barhandl|e%......|
|00004220| 19 00 04 0d 19 0a 11 dd | f2 64 65 66 69 6e 65 6d |........|.definem|
|00004230| 65 6e 75 73 0d 19 14 07 | ea 69 25 0d 19 1e 08 f7 |enus....|.i%.....|
|00004240| 20 2b 30 0d 19 28 07 dc | 20 30 0d 19 32 08 f3 20 | +0..(..| 0..2.. |
|00004250| 69 25 0d 19 3c 1c 69 63 | 6f 6e 62 61 72 6d 65 6e |i%..<.ic|onbarmen|
|00004260| 75 25 3d a4 64 65 66 69 | 6e 65 6d 65 6e 75 0d 19 |u%=.defi|nemenu..|
|00004270| 46 1a 74 79 70 65 73 6d | 65 6e 75 25 3d a4 64 65 |F.typesm|enu%=.de|
|00004280| 66 69 6e 65 6d 65 6e 75 | 0d 19 50 19 69 6e 66 6f |finemenu|..P.info|
|00004290| 6d 65 6e 75 25 3d a4 64 | 65 66 69 6e 65 6d 65 6e |menu%=.d|efinemen|
|000042a0| 75 0d 19 5a 1d 71 75 65 | 73 74 69 6f 6e 6d 65 6e |u..Z.que|stionmen|
|000042b0| 75 25 3d a4 64 65 66 69 | 6e 65 6d 65 6e 75 0d 19 |u%=.defi|nemenu..|
|000042c0| 64 1b 72 65 73 75 6c 74 | 6d 65 6e 75 25 3d a4 64 |d.result|menu%=.d|
|000042d0| 65 66 69 6e 65 6d 65 6e | 75 0d 19 6e 05 e1 0d 19 |efinemen|u..n....|
|000042e0| 78 04 0d 19 82 12 dc 20 | 33 2c 22 57 69 6d 70 44 |x...... |3,"WimpD|
|000042f0| 44 4c 49 22 0d 19 8c 1a | dc 20 30 2c 69 6e 66 6f |DLI"....|. 0,info|
|00004300| 68 61 6e 64 6c 65 25 2c | 22 49 6e 66 6f 22 0d 19 |handle%,|"Info"..|
|00004310| 96 18 dc 20 30 2c 2d 31 | 2c 22 53 74 61 72 74 20 |... 0,-1|,"Start |
|00004320| 61 67 61 69 6e 22 0d 19 | a0 13 dc 20 31 32 38 2c |again"..|... 128,|
|00004330| 2d 31 2c 22 51 75 69 74 | 22 0d 19 aa 04 0d 19 b4 |-1,"Quit|".......|
|00004340| 10 dc 20 31 36 2c 22 54 | 79 70 65 73 22 0d 19 be |.. 16,"T|ypes"...|
|00004350| 04 0d 19 c8 15 dc 20 36 | 2c 22 49 6e 66 6f 72 6d |...... 6|,"Inform|
|00004360| 61 74 69 6f 6e 22 0d 19 | d2 16 dc 20 30 2c 2d 31 |ation"..|... 0,-1|
|00004370| 2c 22 44 44 4c 49 20 64 | 6f 63 73 22 0d 19 dc 15 |,"DDLI d|ocs"....|
|00004380| dc 20 30 2c 2d 31 2c 22 | 44 44 4c 49 20 46 41 51 |. 0,-1,"|DDLI FAQ|
|00004390| 22 0d 19 e6 1d dc 20 30 | 2c 2d 31 2c 22 50 65 72 |"..... 0|,-1,"Per|
|000043a0| 73 6f 6e 61 6c 69 74 79 | 20 74 79 70 65 22 0d 19 |sonality| type"..|
|000043b0| f0 1d dc 20 30 2c 2d 31 | 2c 22 53 75 6d 6d 61 72 |... 0,-1|,"Summar|
|000043c0| 79 20 6f 66 20 74 79 70 | 65 73 22 0d 19 fa 1d dc |y of typ|es".....|
|000043d0| 20 30 2c 2d 31 2c 22 43 | 72 69 74 69 63 61 6c 20 | 0,-1,"C|ritical |
|000043e0| 63 6f 6d 6d 65 6e 74 22 | 0d 1a 04 1c dc 20 26 38 |comment"|..... &8|
|000043f0| 30 2c 2d 31 2c 22 57 69 | 6d 70 44 44 4c 49 20 68 |0,-1,"Wi|mpDDLI h|
|00004400| 65 6c 70 22 0d 1a 0e 04 | 0d 1a 18 12 dc 20 35 2c |elp"....|..... 5,|
|00004410| 22 51 75 65 73 74 69 6f | 6e 22 0d 1a 22 16 dc 20 |"Questio|n"..".. |
|00004420| 30 2c 2d 31 2c 22 55 6e | 2d 61 6e 73 77 65 72 22 |0,-1,"Un|-answer"|
|00004430| 0d 1a 2c 18 dc 20 30 2c | 2d 31 2c 22 53 74 61 72 |..,.. 0,|-1,"Star|
|00004440| 74 20 61 67 61 69 6e 22 | 0d 1a 36 26 dc 20 30 2c |t again"|..6&. 0,|
|00004450| 74 79 70 65 73 6d 65 6e | 75 25 2c 22 54 79 70 65 |typesmen|u%,"Type|
|00004460| 20 64 65 73 63 72 69 70 | 74 69 6f 6e 73 22 0d 1a | descrip|tions"..|
|00004470| 40 25 dc 20 30 2c 69 6e | 66 6f 6d 65 6e 75 25 2c |@%. 0,in|fomenu%,|
|00004480| 22 4f 74 68 65 72 20 69 | 6e 66 6f 72 6d 61 74 69 |"Other i|nformati|
|00004490| 6f 6e 22 0d 1a 4a 1c dc | 20 26 38 38 2c 73 61 76 |on"..J..| &88,sav|
|000044a0| 65 68 61 6e 64 6c 65 25 | 2c 22 53 61 76 65 22 0d |ehandle%|,"Save".|
|000044b0| 1a 54 04 0d 1a 5e 11 dc | 20 35 2c 22 52 65 73 75 |.T...^..| 5,"Resu|
|000044c0| 6c 74 73 22 0d 1a 68 1d | dc 20 30 2c 2d 31 2c 22 |lts"..h.|. 0,-1,"|
|000044d0| 52 65 76 69 65 77 20 71 | 75 65 73 74 69 6f 6e 73 |Review q|uestions|
|000044e0| 22 0d 1a 72 18 dc 20 30 | 2c 2d 31 2c 22 53 74 61 |"..r.. 0|,-1,"Sta|
|000044f0| 72 74 20 61 67 61 69 6e | 22 0d 1a 7c 26 dc 20 30 |rt again|"..|&. 0|
|00004500| 2c 74 79 70 65 73 6d 65 | 6e 75 25 2c 22 54 79 70 |,typesme|nu%,"Typ|
|00004510| 65 20 64 65 73 63 72 69 | 70 74 69 6f 6e 73 22 0d |e descri|ptions".|
|00004520| 1a 86 25 dc 20 30 2c 69 | 6e 66 6f 6d 65 6e 75 25 |..%. 0,i|nfomenu%|
|00004530| 2c 22 4f 74 68 65 72 20 | 69 6e 66 6f 72 6d 61 74 |,"Other |informat|
|00004540| 69 6f 6e 22 0d 1a 90 1c | dc 20 26 38 38 2c 73 61 |ion"....|. &88,sa|
|00004550| 76 65 68 61 6e 64 6c 65 | 25 2c 22 53 61 76 65 22 |vehandle|%,"Save"|
|00004560| 0d 1a 9a 19 f4 20 66 6c | 61 67 73 2c 73 75 62 6d |..... fl|ags,subm|
|00004570| 65 6e 75 2c 65 6e 74 72 | 79 0d 1a a4 04 0d 1a ae |enu,entr|y.......|
|00004580| 10 dd a4 64 65 66 69 6e | 65 6d 65 6e 75 0d 1a b8 |...defin|emenu...|
|00004590| 1f ea 6d 25 2c 6e 25 2c | 77 69 64 74 68 25 2c 69 |..m%,n%,|width%,i|
|000045a0| 25 2c 66 25 2c 69 24 2c | 6e 75 6d 25 0d 1a c2 08 |%,f%,i$,|num%....|
|000045b0| f3 20 6e 25 0d 1a cc 11 | de 20 6d 25 20 32 38 2b |. n%....|. m% 28+|
|000045c0| 32 34 2a 6e 25 0d 1a d6 | 09 f3 20 24 6d 25 0d 1a |24*n%...|.. $m%..|
|000045d0| e0 2a 6d 25 21 31 32 3d | 26 37 30 32 30 37 3a 6d |.*m%!12=|&70207:m|
|000045e0| 25 21 32 30 3d 34 34 3a | 6d 25 21 32 34 3d 30 3a |%!20=44:|m%!24=0:|
|000045f0| 77 69 64 74 68 25 3d 30 | 0d 1a ea 0c 69 25 3d 6d |width%=0|....i%=m|
|00004600| 25 2b 32 38 0d 1a f4 0a | 6e 75 6d 25 3d 30 0d 1a |%+28....|num%=0..|
|00004610| fe 05 f5 0d 1b 08 12 e7 | 24 6d 25 3d 22 54 79 70 |........|$m%="Typ|
|00004620| 65 73 22 20 8c 0d 1b 12 | 3d 20 6e 75 6d 25 2b 3d |es" ....|= num%+=|
|00004630| 31 3a 66 25 3d 30 3a 69 | 25 21 34 3d 2d 31 3a 69 |1:f%=0:i|%!4=-1:i|
|00004640| 24 3d 74 79 70 65 73 24 | 28 6e 75 6d 25 29 3a e7 |$=types$|(num%):.|
|00004650| 6e 75 6d 25 3d 6e 25 20 | 66 25 3d 66 25 20 84 26 |num%=n% |f%=f% .&|
|00004660| 38 30 0d 1b 1c 05 cc 0d | 1b 26 11 20 f3 20 66 25 |80......|.&. . f%|
|00004670| 2c 69 25 21 34 2c 69 24 | 0d 1b 30 05 cd 0d 1b 3a |,i%!4,i$|..0....:|
|00004680| 0a 21 69 25 3d 66 25 0d | 1b 44 0e e7 a9 69 24 3c |.!i%=f%.|.D...i$<|
|00004690| 3d 31 32 20 8c 0d 1b 4e | 1e 20 69 25 21 38 3d 26 |=12 ...N|. i%!8=&|
|000046a0| 37 30 30 30 30 32 31 3a | 24 28 69 25 2b 31 32 29 |7000021:|$(i%+12)|
|000046b0| 3d 69 24 0d 1b 58 05 cc | 0d 1b 62 3c 20 69 25 21 |=i$..X..|..b< i%!|
|000046c0| 38 3d 26 37 30 30 30 31 | 32 31 3a 69 25 21 31 32 |8=&70001|21:i%!12|
|000046d0| 3d a4 6d 65 6e 75 73 70 | 61 63 65 28 69 24 29 3a |=.menusp|ace(i$):|
|000046e0| 69 25 21 31 36 3d 2d 31 | 3a 69 25 21 32 30 3d a9 |i%!16=-1|:i%!20=.|
|000046f0| 69 24 2b 31 0d 1b 6c 14 | 20 24 28 69 25 21 31 32 |i$+1..l.| $(i%!12|
|00004700| 29 3d 69 24 2b bd 31 33 | 0d 1b 76 05 cd 0d 1b 80 |)=i$+.13|..v.....|
|00004710| 1a e7 a9 69 24 3e 77 69 | 64 74 68 25 20 77 69 64 |...i$>wi|dth% wid|
|00004720| 74 68 25 3d a9 69 24 0d | 1b 8a 0a 69 25 2b 3d 32 |th%=.i$.|...i%+=2|
|00004730| 34 0d 1b 94 0c fd 66 25 | 20 80 31 32 38 0d 1b 9e |4.....f%| .128...|
|00004740| 17 6d 25 21 31 36 3d 28 | 31 2b 77 69 64 74 68 25 |.m%!16=(|1+width%|
|00004750| 29 2a 31 36 0d 1b a8 07 | 3d 6d 25 0d 1b b2 04 0d |)*16....|=m%.....|
|00004760| 1b bc 13 dd a4 6d 65 6e | 75 73 70 61 63 65 28 69 |.....men|uspace(i|
|00004770| 24 29 0d 1b c6 07 ea 69 | 25 0d 1b d0 10 de 20 69 |$).....i|%..... i|
|00004780| 25 20 a9 28 69 24 29 2b | 31 0d 1b da 07 3d 69 25 |% .(i$)+|1....=i%|
|00004790| 0d 1b e4 04 0d 1b ee 12 | dd f2 67 65 74 71 75 65 |........|..getque|
|000047a0| 73 74 69 6f 6e 73 0d 1b | f8 0f ea 68 65 72 65 25 |stions..|...here%|
|000047b0| 2c 71 73 74 25 0d 1c 02 | 23 63 68 25 3d 8e 22 3c |,qst%...|#ch%=."<|
|000047c0| 44 44 4c 49 24 44 69 72 | 3e 2e 44 6f 63 73 2e 44 |DDLI$Dir|>.Docs.D|
|000047d0| 44 4c 49 2f 51 53 54 22 | 0d 1c 0c 2f e7 a4 66 69 |DLI/QST"|.../..fi|
|000047e0| 6c 65 6c 69 6e 65 3c 3e | 68 65 61 64 24 20 85 32 |leline<>|head$ .2|
|000047f0| 35 35 2c 22 42 61 64 20 | 71 75 65 73 74 69 6f 6e |55,"Bad |question|
|00004800| 73 20 66 69 6c 65 22 0d | 1c 16 14 e3 68 65 72 65 |s file".|....here|
|00004810| 25 3d 31 20 b8 6e 68 65 | 72 65 25 0d 1c 20 18 20 |%=1 .nhe|re%.. . |
|00004820| 71 73 74 25 3d a0 c1 a4 | 66 69 6c 65 6c 69 6e 65 |qst%=...|fileline|
|00004830| 2c 32 29 0d 1c 2a 17 20 | 71 24 28 71 73 74 25 29 |,2)..*. |q$(qst%)|
|00004840| 3d a4 66 69 6c 65 6c 69 | 6e 65 0d 1c 34 20 20 61 |=.fileli|ne..4 a|
|00004850| 24 28 71 73 74 25 29 3d | a4 66 69 6c 65 71 73 74 |$(qst%)=|.fileqst|
|00004860| 28 61 25 28 71 73 74 25 | 29 29 0d 1c 3e 20 20 62 |(a%(qst%|))..> b|
|00004870| 24 28 71 73 74 25 29 3d | a4 66 69 6c 65 71 73 74 |$(qst%)=|.fileqst|
|00004880| 28 62 25 28 71 73 74 25 | 29 29 0d 1c 48 05 ed 0d |(b%(qst%|))..H...|
|00004890| 1c 52 0f d9 23 63 68 25 | 3a 63 68 25 3d 30 0d 1c |.R..#ch%|:ch%=0..|
|000048a0| 5c 05 e1 0d 1c 66 04 0d | 1c 70 13 dd a4 66 69 6c |\....f..|.p...fil|
|000048b0| 65 71 73 74 28 f8 20 69 | 25 29 0d 1c 7a 0a ea 6a |eqst(. i|%)..z..j|
|000048c0| 25 2c 69 24 0d 1c 84 10 | 69 24 3d a4 66 69 6c 65 |%,i$....|i$=.file|
|000048d0| 6c 69 6e 65 0d 1c 8e 2c | e7 c1 69 24 2c 32 2c 31 |line...,|..i$,2,1|
|000048e0| 29 3e 3d 22 30 22 20 80 | c1 69 24 2c 32 2c 31 29 |)>="0" .|.i$,2,1)|
|000048f0| 3c 3d 22 39 22 20 6a 25 | 3d 32 20 8b 6a 25 3d 31 |<="9" j%|=2 .j%=1|
|00004900| 0d 1c 98 0f 69 25 3d a0 | c0 69 24 2c 6a 25 29 0d |....i%=.|.i$,j%).|
|00004910| 1c a2 0e 3d c1 69 24 2c | 6a 25 2b 31 29 0d 1c ac |...=.i$,|j%+1)...|
|00004920| 04 0d 1c b6 0e dd a4 66 | 69 6c 65 6c 69 6e 65 0d |.......f|ileline.|
|00004930| 1c c0 07 ea 69 24 0d 1c | ca 1d f5 3a 69 24 3d be |....i$..|...:i$=.|
|00004940| 23 63 68 25 3a fd 69 24 | 3c 3e 22 22 20 84 c5 23 |#ch%:.i$|<>"" ..#|
|00004950| 63 68 25 0d 1c d4 07 3d | 69 24 0d 1c de 04 0d 1c |ch%....=|i$......|
|00004960| e8 15 dd f2 6c 6f 61 64 | 66 69 6c 65 28 66 69 6c |....load|file(fil|
|00004970| 65 24 29 0d 1c f2 1b ea | 69 25 2c 69 24 2c 6a 25 |e$).....|i%,i$,j%|
|00004980| 2c 6a 24 2c 71 73 74 25 | 2c 77 25 2c 61 25 0d 1c |,j$,qst%|,w%,a%..|
|00004990| fc 2a e3 69 25 3d 31 20 | b8 6e 68 65 72 65 25 3a |.*.i%=1 |.nhere%:|
|000049a0| 74 65 6d 70 5f 6d 69 78 | 25 28 69 25 29 3d 32 2a |temp_mix|%(i%)=2*|
|000049b0| b3 28 32 29 2d 33 3a ed | 0d 1d 06 12 74 65 6d 70 |.(2)-3:.|....temp|
|000049c0| 5f 64 6f 6e 65 25 28 29 | 3d a3 0d 1d 10 10 63 68 |_done%()|=.....ch|
|000049d0| 25 3d 8e 28 66 69 6c 65 | 24 29 0d 1d 1a 23 f5 3a |%=.(file|$)...#.:|
|000049e0| 69 24 3d a4 66 69 6c 65 | 6c 69 6e 65 3a fd 69 24 |i$=.file|line:.i$|
|000049f0| 3d 68 65 61 64 24 20 84 | c5 23 63 68 25 0d 1d 24 |=head$ .|.#ch%..$|
|00004a00| 20 e7 69 24 3c 3e 68 65 | 61 64 24 20 85 32 35 35 | .i$<>he|ad$ .255|
|00004a10| 2c 22 44 75 66 66 20 66 | 69 6c 65 21 22 0d 1d 2e |,"Duff f|ile!"...|
|00004a20| 30 72 65 73 75 6c 74 24 | 3d 22 58 58 58 58 22 3a |0result$|="XXXX":|
|00004a30| 6f 6c 64 74 79 70 65 24 | 3d a4 64 75 66 66 74 79 |oldtype$|=.duffty|
|00004a40| 70 65 28 a4 66 69 6c 65 | 6c 69 6e 65 29 0d 1d 38 |pe(.file|line)..8|
|00004a50| 10 69 24 3d a4 66 69 6c | 65 6c 69 6e 65 0d 1d 42 |.i$=.fil|eline..B|
|00004a60| 11 e3 69 25 3d 31 20 b8 | 6e 68 65 72 65 25 0d 1d |..i%=1 .|nhere%..|
|00004a70| 4c 1e 20 e7 c0 69 24 2c | 31 29 3c 3e 22 23 22 20 |L. ..i$,|1)<>"#" |
|00004a80| 69 24 3d a4 66 69 6c 65 | 6c 69 6e 65 0d 1d 56 2c |i$=.file|line..V,|
|00004a90| 20 6a 25 3d a7 69 24 2c | 22 2d 22 29 3a 6a 24 3d | j%=.i$,|"-"):j$=|
|00004aa0| c1 69 24 2c 32 2c 6a 25 | 2d 32 29 3a 69 24 3d c1 |.i$,2,j%|-2):i$=.|
|00004ab0| 69 24 2c 6a 25 2b 31 29 | 0d 1d 60 36 20 71 73 74 |i$,j%+1)|..`6 qst|
|00004ac0| 25 3d a0 6a 24 3a 74 65 | 6d 70 5f 61 73 6b 25 28 |%=.j$:te|mp_ask%(|
|00004ad0| 69 25 29 3d 71 73 74 25 | 3a f4 20 51 53 54 20 71 |i%)=qst%|:. QST q|
|00004ae0| 75 65 73 74 69 6f 6e 20 | 6e 75 6d 62 65 72 0d 1d |uestion |number..|
|00004af0| 6a 2a 20 6a 25 3d a7 69 | 24 2c 22 2d 22 29 3a 6a |j* j%=.i|$,"-"):j|
|00004b00| 24 3d c0 69 24 2c 6a 25 | 2d 31 29 3a 69 24 3d c1 |$=.i$,j%|-1):i$=.|
|00004b10| 69 24 2c 6a 25 2b 31 29 | 0d 1d 74 24 20 61 25 3d |i$,j%+1)|..t$ a%=|
|00004b20| a0 6a 24 3a f4 20 61 6e | 73 77 65 72 20 66 75 6e |.j$:. an|swer fun|
|00004b30| 63 74 69 6f 6e 20 6e 75 | 6d 62 65 72 0d 1d 7e 28 |ction nu|mber..~(|
|00004b40| 20 6a 25 3d a7 69 24 2c | 22 23 22 29 3a 6a 24 3d | j%=.i$,|"#"):j$=|
|00004b50| c0 69 24 2c 6a 25 2d 31 | 29 3a 69 24 3d c1 69 24 |.i$,j%-1|):i$=.i$|
|00004b60| 2c 6a 25 29 0d 1d 88 14 | 20 77 25 3d a0 6a 24 3a |,j%)....| w%=.j$:|
|00004b70| f4 20 77 65 69 67 68 74 | 0d 1d 92 0e 20 e7 61 25 |. weight|.... .a%|
|00004b80| 3c 3e 31 37 20 8c 0d 1d | 9c 16 20 20 74 65 6d 70 |<>17 ...|.. temp|
|00004b90| 5f 64 6f 6e 65 25 28 69 | 25 29 3d b9 0d 1d a6 0e |_done%(i|%)=.....|
|00004ba0| 20 20 e7 61 25 3d 31 36 | 20 8c 0d 1d b0 0b 20 20 | .a%=16| ..... |
|00004bb0| 20 77 25 3d 30 0d 1d ba | 07 20 20 cc 0d 1d c4 0e | w%=0...|. .....|
|00004bc0| 20 20 20 c8 8e 20 61 25 | 20 ca 0d 1d ce 26 20 20 | .. a%| ....& |
|00004bd0| 20 c9 20 61 25 28 71 73 | 74 25 29 3a 77 25 3d 2d | . a%(qs|t%):w%=-|
|00004be0| 77 25 2a 74 65 6d 70 5f | 6d 69 78 25 28 69 25 29 |w%*temp_|mix%(i%)|
|00004bf0| 0d 1d d8 25 20 20 20 c9 | 20 62 25 28 71 73 74 25 |...% .| b%(qst%|
|00004c00| 29 3a 77 25 3d 77 25 2a | 74 65 6d 70 5f 6d 69 78 |):w%=w%*|temp_mix|
|00004c10| 25 28 69 25 29 0d 1d e2 | 41 20 20 20 7f 3a 85 32 |%(i%)...|A .:.2|
|00004c20| 35 35 2c 22 49 6d 70 6f | 72 74 65 64 20 66 69 6c |55,"Impo|rted fil|
|00004c30| 65 20 69 73 20 69 6e 63 | 6f 6e 73 69 73 74 65 6e |e is inc|onsisten|
|00004c40| 74 20 77 69 74 68 20 71 | 75 65 73 74 69 6f 6e 73 |t with q|uestions|
|00004c50| 20 66 69 6c 65 22 0d 1d | ec 08 20 20 20 cb 0d 1d | file"..|.. ...|
|00004c60| f6 07 20 20 cd 0d 1e 00 | 19 20 20 74 65 6d 70 5f |.. ....|. temp_|
|00004c70| 61 6e 73 77 65 72 25 28 | 69 25 29 3d 77 25 0d 1e |answer%(|i%)=w%..|
|00004c80| 0a 06 20 cd 0d 1e 14 05 | ed 0d 1e 1e 0f d9 23 63 |.. .....|......#c|
|00004c90| 68 25 3a 63 68 25 3d 30 | 0d 1e 28 13 73 61 76 65 |h%:ch%=0|..(.save|
|00004ca0| 6e 61 6d 65 24 3d 66 69 | 6c 65 24 0d 1e 32 57 61 |name$=fi|le$..2Wa|
|00004cb0| 73 6b 25 28 29 3d 74 65 | 6d 70 5f 61 73 6b 25 28 |sk%()=te|mp_ask%(|
|00004cc0| 29 3a 61 6e 73 77 65 72 | 25 28 29 3d 74 65 6d 70 |):answer|%()=temp|
|00004cd0| 5f 61 6e 73 77 65 72 25 | 28 29 3a 64 6f 6e 65 25 |_answer%|():done%|
|00004ce0| 28 29 3d 74 65 6d 70 5f | 64 6f 6e 65 25 28 29 3a |()=temp_|done%():|
|00004cf0| 6d 69 78 25 28 29 3d 74 | 65 6d 70 5f 6d 69 78 25 |mix%()=t|emp_mix%|
|00004d00| 28 29 0d 1e 3c 36 21 62 | 6c 6f 63 6b 25 3d 72 65 |()..<6!b|lock%=re|
|00004d10| 73 75 6c 74 68 61 6e 64 | 6c 65 25 3a c8 99 22 57 |sulthand|le%:.."W|
|00004d20| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00004d30| 2c 2c 62 6c 6f 63 6b 25 | 0d 1e 46 35 21 62 6c 6f |,,block%|..F5!blo|
|00004d40| 63 6b 25 3d 69 6e 74 72 | 6f 68 61 6e 64 6c 65 25 |ck%=intr|ohandle%|
|00004d50| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00004d60| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 1e 50 |ndow",,b|lock%..P|
|00004d70| 14 71 75 65 73 74 69 6f | 6e 25 3d 6e 68 65 72 65 |.questio|n%=nhere|
|00004d80| 25 0d 1e 5a 16 f2 6e 65 | 78 74 71 75 65 73 74 69 |%..Z..ne|xtquesti|
|00004d90| 6f 6e 28 31 2c b9 29 0d | 1e 64 3f e7 71 75 65 73 |on(1,.).|.d?.ques|
|00004da0| 74 69 6f 6e 25 3c 3e 6e | 68 65 72 65 25 2b 31 20 |tion%<>n|here%+1 |
|00004db0| f2 71 75 65 73 74 69 6f | 6e 20 8b f2 63 6c 6f 73 |.questio|n ..clos|
|00004dc0| 65 71 75 65 73 74 69 6f | 6e 73 3a f2 6f 70 65 6e |equestio|ns:.open|
|00004dd0| 72 65 73 75 6c 74 0d 1e | 6e 05 e1 0d 1e 78 04 0d |result..|n....x..|
|00004de0| 1e 82 15 dd f2 73 61 76 | 65 66 69 6c 65 28 66 69 |.....sav|efile(fi|
|00004df0| 6c 65 24 29 0d 1e 8c 0a | ea 69 24 2c 69 25 0d 1e |le$)....|.i$,i%..|
|00004e00| 96 20 69 24 3d 6f 6c 64 | 74 79 70 65 24 3a e7 69 |. i$=old|type$:.i|
|00004e10| 24 3d 22 22 20 69 24 3d | 22 3f 3f 3f 3f 22 0d 1e |$="" i$=|"????"..|
|00004e20| a0 11 e3 69 25 3d 31 20 | b8 6e 68 65 72 65 25 0d |...i%=1 |.nhere%.|
|00004e30| 1e aa 1a 20 e7 ac 64 6f | 6e 65 25 28 69 25 29 20 |... ..do|ne%(i%) |
|00004e40| 69 24 3d 22 2a 2a 2a 2a | 22 0d 1e b4 05 ed 0d 1e |i$="****|".......|
|00004e50| be 0b c8 8e 20 69 24 20 | ca 0d 1e c8 1d c9 22 2a |.... i$ |......"*|
|00004e60| 2a 2a 2a 22 3a 66 69 6c | 65 30 24 3d 22 50 61 72 |***":fil|e0$="Par|
|00004e70| 74 69 61 6c 20 22 0d 1e | d2 1d c9 22 3f 3f 3f 3f |tial "..|..."????|
|00004e80| 22 3a 66 69 6c 65 30 24 | 3d 22 55 6e 6b 6e 6f 77 |":file0$|="Unknow|
|00004e90| 6e 20 22 0d 1e dc 15 7f | 3a 66 69 6c 65 30 24 3d |n ".....|:file0$=|
|00004ea0| 22 4b 6e 6f 77 6e 20 22 | 0d 1e e6 05 cb 0d 1e f0 |"Known "|........|
|00004eb0| 10 63 68 25 3d ae 28 66 | 69 6c 65 24 29 0d 1e fa |.ch%=.(f|ile$)...|
|00004ec0| 27 63 68 32 25 3d 8e 28 | 22 3c 44 44 4c 49 24 44 |'ch2%=.(|"<DDLI$D|
|00004ed0| 69 72 3e 2e 42 6c 61 6e | 6b 73 2e 22 2b 66 69 6c |ir>.Blan|ks."+fil|
|00004ee0| 65 30 24 29 0d 1f 04 05 | f5 0d 1f 0e 0e 20 69 25 |e0$)....|..... i%|
|00004ef0| 3d 9a 23 63 68 32 25 0d | 1f 18 0d 20 d5 23 63 68 |=.#ch2%.|... .#ch|
|00004f00| 25 2c 69 25 0d 1f 22 0b | fd c5 23 63 68 32 25 0d |%,i%..".|..#ch2%.|
|00004f10| 1f 2c 11 d9 23 63 68 32 | 25 3a 63 68 32 25 3d 30 |.,..#ch2|%:ch2%=0|
|00004f20| 0d 1f 36 14 f2 66 69 6c | 65 6c 69 6e 65 28 68 65 |..6..fil|eline(he|
|00004f30| 61 64 24 29 0d 1f 40 11 | f2 66 69 6c 65 6c 69 6e |ad$)..@.|.filelin|
|00004f40| 65 28 69 24 29 0d 1f 4a | 09 69 24 3d 22 22 0d 1f |e(i$)..J|.i$=""..|
|00004f50| 54 11 e3 69 25 3d 31 20 | b8 6e 68 65 72 65 25 0d |T..i%=1 |.nhere%.|
|00004f60| 1f 5e 1a 20 69 24 2b 3d | 22 23 22 2b c3 61 73 6b |.^. i$+=|"#"+.ask|
|00004f70| 25 28 69 25 29 2b 22 2d | 22 0d 1f 68 12 20 e7 ac |%(i%)+"-|"..h. ..|
|00004f80| 64 6f 6e 65 25 28 69 25 | 29 20 8c 0d 1f 72 10 20 |done%(i%|) ...r. |
|00004f90| 20 69 24 2b 3d 22 31 37 | 2d 30 22 0d 1f 7c 06 20 | i$+="17|-0"..|. |
|00004fa0| cc 0d 1f 86 16 20 20 e7 | 61 6e 73 77 65 72 25 28 |..... .|answer%(|
|00004fb0| 69 25 29 3d 30 20 8c 0d | 1f 90 11 20 20 20 69 24 |i%)=0 ..|... i$|
|00004fc0| 2b 3d 22 31 36 2d 30 22 | 0d 1f 9a 07 20 20 cc 0d |+="16-0"|.... ..|
|00004fd0| 1f a4 43 20 20 20 e7 61 | 6e 73 77 65 72 25 28 69 |..C .a|nswer%(i|
|00004fe0| 25 29 2a 6d 69 78 25 28 | 69 25 29 3e 30 20 69 24 |%)*mix%(|i%)>0 i$|
|00004ff0| 2b 3d c3 62 25 28 61 73 | 6b 25 28 69 25 29 29 20 |+=.b%(as|k%(i%)) |
|00005000| 8b 69 24 2b 3d c3 61 25 | 28 61 73 6b 25 28 69 25 |.i$+=.a%|(ask%(i%|
|00005010| 29 29 0d 1f ae 1c 20 20 | 20 69 24 2b 3d 22 2d 22 |)).... | i$+="-"|
|00005020| 2b c3 94 61 6e 73 77 65 | 72 25 28 69 25 29 0d 1f |+..answe|r%(i%)..|
|00005030| b8 07 20 20 cd 0d 1f c2 | 06 20 cd 0d 1f cc 2e 20 |.. ....|. ..... |
|00005040| e7 28 69 25 20 83 38 29 | 3d 30 20 84 69 25 3d 6e |.(i% .8)|=0 .i%=n|
|00005050| 68 65 72 65 25 20 f2 66 | 69 6c 65 6c 69 6e 65 28 |here% .f|ileline(|
|00005060| 69 24 29 3a 69 24 3d 22 | 22 0d 1f d6 05 ed 0d 1f |i$):i$="|".......|
|00005070| e0 0f d9 23 63 68 25 3a | 63 68 25 3d 30 0d 1f ea |...#ch%:|ch%=0...|
|00005080| 27 ff 22 53 65 74 54 79 | 70 65 20 22 2b 66 69 6c |'."SetTy|pe "+fil|
|00005090| 65 24 2b 22 20 22 2b c2 | 73 61 76 65 69 63 6f 6e |e$+" "+.|saveicon|
|000050a0| 24 2c 33 29 0d 1f f4 05 | e1 0d 1f fe 04 0d 20 08 |$,3)....|...... .|
|000050b0| 12 dd f2 66 69 6c 65 6c | 69 6e 65 28 69 24 29 0d |...filel|ine(i$).|
|000050c0| 20 12 10 d5 23 63 68 25 | 2c 69 24 2b bd 31 33 0d | ...#ch%|,i$+.13.|
|000050d0| 20 1c 05 e1 0d 20 26 04 | 0d 20 30 13 dd f2 69 6e | .... &.|. 0...in|
|000050e0| 69 74 71 75 65 73 74 69 | 6f 6e 73 0d 20 3a 07 ea |itquesti|ons. :..|
|000050f0| 69 25 0d 20 44 0c e3 69 | 25 3d 30 20 b8 37 0d 20 |i%. D..i|%=0 .7. |
|00005100| 4e 1c 20 21 62 6c 6f 63 | 6b 25 3d 71 75 65 73 74 |N. !bloc|k%=quest|
|00005110| 69 6f 6e 68 61 6e 64 6c | 65 25 0d 20 58 10 20 62 |ionhandl|e%. X. b|
|00005120| 6c 6f 63 6b 25 21 34 3d | 69 25 0d 20 62 22 20 c8 |lock%!4=|i%. b" .|
|00005130| 99 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 |."Wimp_G|etIconSt|
|00005140| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 20 6c 19 |ate",,bl|ock%. l.|
|00005150| 20 71 69 63 6f 6e 25 28 | 69 25 29 3d 62 6c 6f 63 | qicon%(|i%)=bloc|
|00005160| 6b 25 21 32 38 0d 20 76 | 0c 20 c8 8e 20 69 25 20 |k%!28. v|. .. i% |
|00005170| ca 0d 20 80 33 20 c9 30 | 3a 71 78 31 25 3d 62 6c |.. .3 .0|:qx1%=bl|
|00005180| 6f 63 6b 25 21 38 3a 71 | 78 32 25 3d 62 6c 6f 63 |ock%!8:q|x2%=bloc|
|00005190| 6b 25 21 31 36 3a 71 79 | 32 25 3d 62 6c 6f 63 6b |k%!16:qy|2%=block|
|000051a0| 25 21 32 30 0d 20 8a 16 | 20 c9 31 3a 71 79 31 25 |%!20. ..| .1:qy1%|
|000051b0| 3d 62 6c 6f 63 6b 25 21 | 31 32 0d 20 94 33 20 c9 |=block%!|12. .3 .|
|000051c0| 32 3a 61 78 31 25 3d 62 | 6c 6f 63 6b 25 21 38 3a |2:ax1%=b|lock%!8:|
|000051d0| 61 78 32 25 3d 62 6c 6f | 63 6b 25 21 31 36 3a 61 |ax2%=blo|ck%!16:a|
|000051e0| 79 32 25 3d 62 6c 6f 63 | 6b 25 21 32 30 0d 20 9e |y2%=bloc|k%!20. .|
|000051f0| 16 20 c9 34 3a 61 79 31 | 25 3d 62 6c 6f 63 6b 25 |. .4:ay1|%=block%|
|00005200| 21 31 32 0d 20 a8 33 20 | c9 35 3a 62 78 31 25 3d |!12. .3 |.5:bx1%=|
|00005210| 62 6c 6f 63 6b 25 21 38 | 3a 62 78 32 25 3d 62 6c |block%!8|:bx2%=bl|
|00005220| 6f 63 6b 25 21 31 36 3a | 62 79 32 25 3d 62 6c 6f |ock%!16:|by2%=blo|
|00005230| 63 6b 25 21 32 30 0d 20 | b2 16 20 c9 37 3a 62 79 |ck%!20. |.. .7:by|
|00005240| 31 25 3d 62 6c 6f 63 6b | 25 21 31 32 0d 20 bc 06 |1%=block|%!12. ..|
|00005250| 20 cb 0d 20 c6 05 ed 0d | 20 d0 1b 21 62 6c 6f 63 | .. ....| ..!bloc|
|00005260| 6b 25 3d 71 75 65 73 74 | 69 6f 6e 68 61 6e 64 6c |k%=quest|ionhandl|
|00005270| 65 25 0d 20 da 22 c8 99 | 22 57 69 6d 70 5f 47 65 |e%. ."..|"Wimp_Ge|
|00005280| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 22 2c 2c 62 6c |tWindowI|nfo",,bl|
|00005290| 6f 63 6b 25 0d 20 e4 1a | 74 69 74 6c 65 62 75 66 |ock%. ..|titlebuf|
|000052a0| 66 65 72 25 3d 62 6c 6f | 63 6b 25 21 37 36 0d 20 |fer%=blo|ck%!76. |
|000052b0| ee 0f 71 75 65 73 74 69 | 6f 6e 25 3d 30 0d 20 f8 |..questi|on%=0. .|
|000052c0| 05 e1 0d 21 02 04 0d 21 | 0c 10 dd f2 69 6e 69 74 |...!...!|....init|
|000052d0| 72 65 73 75 6c 74 0d 21 | 16 07 ea 69 25 0d 21 20 |result.!|...i%.! |
|000052e0| 0d e3 69 25 3d 30 20 b8 | 32 32 0d 21 2a 1a 20 21 |..i%=0 .|22.!*. !|
|000052f0| 62 6c 6f 63 6b 25 3d 72 | 65 73 75 6c 74 68 61 6e |block%=r|esulthan|
|00005300| 64 6c 65 25 0d 21 34 10 | 20 62 6c 6f 63 6b 25 21 |dle%.!4.| block%!|
|00005310| 34 3d 69 25 0d 21 3e 22 | 20 c8 99 22 57 69 6d 70 |4=i%.!>"| .."Wimp|
|00005320| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00005330| 62 6c 6f 63 6b 25 0d 21 | 48 19 20 72 69 63 6f 6e |block%.!|H. ricon|
|00005340| 25 28 69 25 29 3d 62 6c | 6f 63 6b 25 21 32 38 0d |%(i%)=bl|ock%!28.|
|00005350| 21 52 05 ed 0d 21 5c 05 | e1 0d 21 66 04 0d 21 70 |!R...!\.|..!f..!p|
|00005360| 0e dd f2 69 6e 69 74 73 | 61 76 65 0d 21 7a 18 20 |...inits|ave.!z. |
|00005370| 21 62 6c 6f 63 6b 25 3d | 73 61 76 65 68 61 6e 64 |!block%=|savehand|
|00005380| 6c 65 25 0d 21 84 0f 20 | 62 6c 6f 63 6b 25 21 34 |le%.!.. |block%!4|
|00005390| 3d 30 0d 21 8e 22 20 c8 | 99 22 57 69 6d 70 5f 47 |=0.!." .|."Wimp_G|
|000053a0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|000053b0| 6f 63 6b 25 0d 21 98 1e | 20 73 61 76 65 73 70 72 |ock%.!..| savespr|
|000053c0| 69 74 65 69 63 6f 6e 25 | 3d 62 6c 6f 63 6b 25 21 |iteicon%|=block%!|
|000053d0| 32 38 0d 21 a2 0f 20 62 | 6c 6f 63 6b 25 21 34 3d |28.!.. b|lock%!4=|
|000053e0| 31 0d 21 ac 22 20 c8 99 | 22 57 69 6d 70 5f 47 65 |1.!." ..|"Wimp_Ge|
|000053f0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00005400| 63 6b 25 0d 21 b6 1c 20 | 73 61 76 65 6e 61 6d 65 |ck%.!.. |savename|
|00005410| 69 63 6f 6e 25 3d 62 6c | 6f 63 6b 25 21 32 38 0d |icon%=bl|ock%!28.|
|00005420| 21 c0 05 e1 0d 21 ca 04 | 0d 21 d4 0b dd f2 65 72 |!....!..|.!....er|
|00005430| 72 6f 72 0d 21 de 08 ea | 20 69 25 0d 21 e8 14 e7 |ror.!...| i%.!...|
|00005440| 63 68 25 20 d9 23 63 68 | 25 3a 63 68 25 3d 30 0d |ch% .#ch|%:ch%=0.|
|00005450| 21 f2 17 e7 63 68 32 25 | 20 d9 23 63 68 32 25 3a |!...ch2%| .#ch2%:|
|00005460| 63 68 32 25 3d 30 0d 21 | fc 0b e7 76 63 68 25 20 |ch2%=0.!|...vch% |
|00005470| 8c 0d 22 06 12 20 d9 23 | 76 63 68 25 3a 76 63 68 |..".. .#|vch%:vch|
|00005480| 25 3d 30 0d 22 10 18 20 | 21 62 6c 6f 63 6b 25 3d |%=0.".. |!block%=|
|00005490| 76 69 65 77 68 61 6e 64 | 6c 65 25 0d 22 1a 21 20 |viewhand|le%.".! |
|000054a0| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|000054b0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 22 24 05 |dow",,bl|ock%."$.|
|000054c0| cd 0d 22 2e 0c e7 77 69 | 6d 70 25 20 8c 0d 22 38 |.."...wi|mp% .."8|
|000054d0| 27 20 69 25 3d a4 72 65 | 70 6f 72 74 28 74 61 73 |' i%=.re|port(tas|
|000054e0| 6b 24 2c f6 24 2b 22 20 | 28 22 2b c3 9e 2b 22 29 |k$,.$+" |("+..+")|
|000054f0| 22 2c 31 29 0d 22 42 05 | cc 0d 22 4c 16 20 f1 f6 |",1)."B.|.."L. ..|
|00005500| 24 3b 22 20 61 74 20 6c | 69 6e 65 20 22 3b 9e 0d |$;" at l|ine ";..|
|00005510| 22 56 05 cd 0d 22 60 05 | e1 0d 22 6a 04 0d 22 74 |"V..."`.|.."j.."t|
|00005520| 23 dd a4 72 65 70 6f 72 | 74 28 68 65 61 64 69 6e |#..repor|t(headin|
|00005530| 67 24 2c 6d 65 73 73 24 | 2c 66 6c 61 67 73 25 29 |g$,mess$|,flags%)|
|00005540| 0d 22 7e 07 ea 69 25 0d | 22 88 15 21 72 65 70 6f |."~..i%.|"..!repo|
|00005550| 72 74 62 6c 6f 63 6b 25 | 3d 32 35 35 0d 22 92 1e |rtblock%|=255."..|
|00005560| 24 28 72 65 70 6f 72 74 | 62 6c 6f 63 6b 25 2b 34 |$(report|block%+4|
|00005570| 29 3d 6d 65 73 73 24 2b | bd 30 0d 22 9c 3a c8 99 |)=mess$+|.0.".:..|
|00005580| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00005590| 72 22 2c 72 65 70 6f 72 | 74 62 6c 6f 63 6b 25 2c |r",repor|tblock%,|
|000055a0| 66 6c 61 67 73 25 2c 68 | 65 61 64 69 6e 67 24 20 |flags%,h|eading$ |
|000055b0| b8 2c 69 25 0d 22 a6 07 | 3d 69 25 0d 22 b0 04 0d |.,i%."..|=i%."...|
|000055c0| 22 ba 13 dd f2 72 65 70 | 6f 72 74 28 6d 65 73 73 |"....rep|ort(mess|
|000055d0| 24 29 0d 22 c4 07 ea 69 | 25 0d 22 ce 19 69 25 3d |$)."...i|%."..i%=|
|000055e0| a4 72 65 70 6f 72 74 28 | 6d 65 73 73 24 2c 26 31 |.report(|mess$,&1|
|000055f0| 31 29 0d 22 d8 05 e1 0d | ff |1)."....|. |
+--------+-------------------------+-------------------------+--------+--------+